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はじめに 


前著 『 SX - WINDOW プログラミング j 力 5 ' 発売に なって、 ひと 月 もしない うちに X 68000 
の 新 シリーズ XVI がリ リースされ， 同時に SX - WINDOW も 大幅に 変更され て バージョン 
1.10 となりました。 新しい SX - WINDOW は， 画面 描画 スピードの 向上， プリンタ マネー 
ジャ / プリンタ ドライバ 周辺の 充実， そして 優秀な エディタの 添付な ど， さらに 実用 14 が 高め 
られた 内容と なって います。 

バージョンアップ 自体は おおいに 歓迎すべき こ となので すが， 『 SX - WINDOW プロ グラミ 
ング』 だけでは フ オローし きれない 部分 もし だいに 明らかになって きました 。 SX コールは 大 
幅に 増設され， 新しい マネージャが 2 つも 新設され ています。 

このよう な 変更に 対応す るた め， 本書 『追 補 版 SX - WINDOW プロ グラミ ング』 が 企画 さ 
れ， 出版に 至りました。 さらに 強力に なった SX - WINDOW を， 本書に よって 十二分に 活用 
していた だければ 幸いです。 

また， 今回， サンプル プログラム 類の 入力の 手間を 省く こと や， ペーパー メディアでは 十分 
には 伝わらない 情報を お届けす るた め， 付録と して フロッピー ディスクを' 添# する ことにな り 
ました。 この デ、 ィス ク には， パソコン通信で 公開され ている SX - WINDOW 用の フリー ソフ 
トウ エアを， 作者の 皆さんの 許可を 得て 収録 させて いただ' きました。 

なお， 本書では， 『 SX - WINDOW プログラミング』 を 『 SX - WINDOW ~』， 『追 補 版 SX - 
WINDOW プログラミング』 を 『本書』 あるいは 『追 補)! gj と 呼んで 区別 J する ことにします。 


本 害の 内容 


本書は ， SHARP X 68000 用に リリース された ウインドウ システム， SX - WIND 〇 W の 
アプリケーションを 作成す るた めに 必要な 情報を ま とめた ものです。 とくに， SX-WINDOW 
の バージョンアップに ともない， 前著 『 SX - WINDOW プログラミング』 では カバー しきれ 
なくなった 部分に ついて 解説を 行う ことを 目的と しています。 また， 『 SX - WINDOW プロ グ 
ラ ミ ング』 で 説明の 不足 していた， アプリ ケー ショ ン 作成に 関して の 補足 解説 も 行って います。 

•第 0 章 SX-WINDOW verl.10 の 概要 

パ、ー ジョン アップ された SX - WINDOW の 概要に ついて 述べて います。 内部的な こ とには 
深く 立ち入らず， SX - WINDOW の 歴史 や 外見 的， 機能的な 変遷な どに ついて 述べ， どのよ 
うに 変化して 現在に 至った かを 示して います。 
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はじめに 


•第 1 章 プロ グラミ ングの 補足説明 

『 SX - WINDOW プロ グラミ ング』 で 不足して ぃた アプリ ケー シ ョン 開発の 手順に つぃての 
補足 解説を 行って ぃます。 ここでは， アプリ ケーシ ョンの 設計から デバ、 ッグまで， ぃくつかの 
段階に 分けて 解説を 行ぃます。 

•第 2 章 拡張され た マネージャ 

SX - WINDOW の 機能 ア ップ にと も なぃ， 既存の マネージャ も それぞれ 大幅に 機能の 拡張が 
行われて ぃます。 この 章では， 大幅に lliSfi された グラフ ィ ック マネージャ， テキス ト マネージャ， 
タスク マネージャの 3 つを 中心に， 既存の マネージャの 変更/拡張 点に つぃて 述べて ぃます。 
新い 、機能を 利用し た サンプル プロ グラ ムも 掲載し ました。 

•第 3 章 新設され た マネージャ 

SX - WINDOW バージョン 1.1 0 には， 新しぃ マネージャ として プリント マネージャ ，サ 
ブ ウィンドウ マネージャの 2 つが 追加され てぃます。 この 章では， それぞれの マネージャで 
導入 さ れた 新い 、概念 や， それら を 利用 した プロ グラ ミン グ などに つぃて 解説して ぃます。 

そ れぞれ の 新設 マネージャ を 利用し た サンプル プロ グラ ムも 掲載し ました 0 

•第 4 章 C 言語に よる プログラミング 

『 SX - WINDOW プログラミング』 に対して ご 要望の 多かった， C 言語に よる SX アプリ 
ケー シ ョンの 作成 方法に つぃて 述べて ぃます。 处 理系と しては， XC パ、 ー ジョン £.00 を 利用 
してぃます。 

•第 5 章 SX コール リファレンス 

変更 • 追加され た SX コールを 1 つ 1 つ 解説し ます 0 

• APPENDIX 

新しく 追加され た リソースの リスト， いくつかの コー ドが 追加 さ れたリ ザル トコ ー ド 表な ど 
を 掲載し ました。 

付# ディスクに ついての 解説 もこ こで 行って います。 


付録 ディスクの 内容 


付録 ディスクは 2 HD ， 1.2 M バイ トの Human フォーマットの ディスク 1 枚で 構成され 
ており， 次の ような 情報が 収められて います。 

• G 言語に よる 開発 キット 

• 『 SX - WINDOW プロ グラミ ン ダ』， 『追 補 版 SX - WINDOW プロ グラミ ング』 の サン 
プノ レ プログラム ソース 
• フリーソフト ウェアの 開発 ツール 
•フリー ソフ トウ エアの アプリケーション 
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ご 利用に 際して は， APPENDIX の 「付録 ディスクの 使い方」， および ディスク 中の 


README をよ く お読みく ださい。 


はじめに 


使用 環境 

本書では， 以下の システムを 独自に 解析した 結果を も とに 解説を 行って います。 

•SX - SYSTEM Verl.lO FSX.X 121548 9 卜 03- 丨 5 12 : 00 : 00 *1 

•SX-SHELL Verl.lO SXWIN.X 16732 91-03-15 12 : 00 : 00 *1 

筆者の 使用した 走行 環境は， 以下のと おりです。 サンプル プログラム 等は， 以下の 環境で 正 
しく 動 Jf 乍す る ことを 希望して 作成され ています。 

• 本体 X68000 XVI-HD 

• 増設 RAM CZ-6BE2A 

• OS Human68k ver2.02 

HUMAN.SYS 54240 90-05-05 12:00:00 氺 2 

COMMAND.X 28026 90-05-05 12:00:00 *2 

開発 ツールと しては， 以下の ものを 使用し ました。 サンプル プログラム 等は， 以下の ツール 
を 利用 して 正しく 作成で き る こと 力 印 鶴 忍 さ れ ています。 


• アセンブラ 

AS.X 

28194 

88-04-02 

12:00:00 

木 2 


AS.X 

99572 

90-05-05 

12:00:00 

*2 


HAS.X 

29530 

91-06-12 

23 : 55 : 06 

*3 

• リンカ 

LK.X 

42598 

90-05-05 

12:00:00 

氺 2 


HLK.X 

25782 

91-09-24 

21 :21 :24 

*4 

• デバッガ 

DB.X 

38712 

90-1 卜 01 

12:00:00 

*2 

• コンバータ 

CV.X 

17570 

90-05-05 

12:00:00 

*2 

• リソース リンカ 

RLK.X 

12252 

90-1 卜 01 

12:00:00 

*1 


RSC.X 

16700 

91-08-13 

21 :01 :56 

*5 

• エディタ 

MicroEmacsJ 1 .31 





em.x 

164108 

90-04-24 

1 1 : 00 : 00 

*6 


MicroEmacsJ 1 .40 





em.x 

244520 

91-03-15 

12:00:00 

*7 


フリー ソフ トウ エアの 作者の 方々 には， 心から 感謝いた します。 


* I : (c) SHARP/ First Class Technorogy 

* 2 ： (c) SHARP/Hudson 

*3 : フリーソフト ウ i ア YuNK (中 村祐 一 ） 氏 製作 

*4: フリーソフトウェア SALT 氏 製作 

*5 : フリー ソフ ト ウヱア 清水 和久氏 製作 

*6: フリーソフトウェア ICAM 氏， HOMY 氏 製作 

*7: フリー ソフ ト ウェア lika/SALT/PEACE/SHUNA/rima 氏 製作 
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SX-WINDOW 
verUO の 概要 


1991 年 4 月， XVI シリーズの 登場と ともに SX-WINDOW 
も 大幅に 改変され， バージョン 1.10 となりました。 表示 等の 
スピードアップ や エディタ . X の 添付な どで いっそう 実用的に 
なった のは もちろんで すが， 内部的に も 大幅に 改良/拡張され 
ています。 この 章では， 現在までの SX - WINDOW の 歩み 
と， 新しい SX - WINDOW ， バージョン U 0 の 概要を 示し 
ます。 


第 0 章 SX-WINDOWve 「 .1.10 の 概要 


X68000 用 ウイ ン ドウ システム である SX-WINDOW が 最初に リ リースされ たのが 
1990 年 4： 月。 ごく 短い 期間 SUPER EXPERTII, PRO II に 添付され た バージョン 1.00 
から 始まって， すぐに 1.02 へバ 、ー ジョン アップ。 これが いちおうの 安定 パ' ー ジョンと して， 
単体で 市販され るよう になり ました （図 1)。 

■ 図 1 SX-WINDOW verl .02 の デスクトップ 



マルチ ウインドウ， マルチ タスクの 〇 S が， メモリ わずか バイト， しかも フロッピー 
ベースで 使えて， 価格が わずか 6800円 （ただし 限定 価格） というのは， 巷の ウインド ウシ 
ス テムの 肥大 化が 始まり かけて いた 当時と しても， 驚異的では ありました* 1 。 そんな わけで, 
致命的な バグ もな く， 入手 も 利用 も 容易な かたちで 提供され たこと から， SX-WIND 〇 W 
vei\1.02 (以下 SX1.02) は 比較的 短期間で 普及し ました。 

*1: もっとも， シングル タスクながら， Mac も 最初は メモリ I28K バイ トが 標準で したし， Amiga は 512 
K バイ トで マルチ タスクまで も 行って います。 SX-WIND0W の 場合は， システム プログラムを すべ 
て RAM 上に 置かなければ ならない という 点で 多少 不利では あり ます。 このよう な 貧乏 自慢の よう 
な 比較は あまり 意味が ないか もしれ ません が …… 。 

SX1.02 に 問題が あった とすれば， それは 次の よう な 点でした。 

⑴ 動作 スピードが 若干 遅い 

キャラクタ ベースの イ ンタ フェース と 比較した 場合， グラフ イ カルな ユーザー イ ン ター 
フェースは どうしても®; 理が 重くな りが ちです。 しかし， 使う 側の 立場から すれば， それは っ 
く る 側の 都合で しかありません。 

⑵ 基本的な デバイスの 管理が'^ 十分 

OS の 役割は 資源の 管理に あり ます 力 5 '， SX1.0£ には 資源の 一種で ある デ バイ スの 管理に 
不十分な とこ ろが ありま した。 たと え ば， 基本的な デ バイ ス である プリ ンタの 管理に もう 1 つ 
柔軟性が な く， アプリ ケー シヨ ンが 任意の 図形を 印刷 しようと した 場合は, SX-WINDOW の 
管理の およばない IOCS レベルで 处理を 行う 必要が ありま した。 この 方法では タスク 間の 競 
合を 避ける 方法がない ため* 2 ， マルチ タスク 環境で ある SX-WINDOW にはな じみません。 
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第 0 章 SX - WINDOWve 「.1.10 の 概要 


*2: その タスク だけで CPU 時間を 占有 するとい う 方法は あります が， マルチ タスクの 環境 下では， あ 
まり スマー トな 方法とは いえません。 

⑸グラ フィ ッ ク データの 表現力/扱いが 弱い 

マッ キント ッシュ 以降の パーソナルコンピュータ 上の ウイン ドウ システムは， 多 かれ 少な か 
れ， マッキントッシュの 影響 下にあります。 マッキントッシュの 優れてい る 点の 1 つに， 文 
字 データ も グラフ ィ ック テ、' ータも ほぼ 同じように 扱える， という こ とが 挙げられます。 

こうした 優れた 点は ぜひとも 取り入れて ほしかった ところで すが， SX 1.0£ tT は， クリッ 
プ ボード （デスクトップ スクラップ） で アイコン データの ほかには 文字列 データ 以外は やりと 
りする こ とが 考慮され ていませんでした。 SX - WINDOW のよ うな グラフィカルな 環境 下で 
動作す る ワープロ ソフト が 登場した 場合， 図形の 張り込みが サ ポー トされる こと は 間違い あり 
ま せんが， SX 1.02 では そこ に 機能的な 穴が 存在し ま した。 

こうした ことから も， SX 1.02 は 本^的な アプリケーションの 動作す る 環境と しては， や 
や 力不足な も のであった こと は 否め ま せん。 

しかし， それ も 1991 年 4 月， X 68000 XVI シリーズと ともに 登場した SX-WINDOW 
ver.LlO (以下 S XL 10) によって 過去の 話と なって しまいました （図 幻。 

■ 図 2 SX-WINDOW ver.1.10 の デスク ト ップ 



SX 1.10 は， SX 1.02 との 上位互換性を 維持した うえで， 先 ほど 挙げた 問題点を ほとんど 
クリアして しまい ま した。 

まず 最初に 気がつく ことは， 全 伸: 的な 処理 速度の 向上です。 その 代表例が， SX 1.10 から 
添付され るよう になった エディタ . X です （14 ページ 図 3)。 この エディタは Human 上の エ 
ディタと 上 交しても 決して ひけを とらない スピードで 動いて くれます。 SX - SYSTEM ， と 
く に グラフ ィ ック マネージャ と テキス ト マネージャが 改良され た 結果， この 速度の 向上を もた 
ら しています。 
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■図 3 エディタ .X 



そして， デ、 バイスの 管理に ついては， プリンタに 関しては 大幅な 改良が 施され， 細かい コン 
ト ロールと 表現力 豊かな 印刷が 可能と なり ま した。 この 機能は， SX - SYSTEM に 新しく 追 
加され た プリ ント マネージャ によって 提供され， すべての アプリ ケー シ ヨンが それを 利用す る 
こと 力呵 能です （図 4)。 


■図 4 コント ロ ー ル パネルの 印刷 環境 設定 



最後に 挙げた グラフ イ ック データ 云々 について は， SX - WINDOW 用 アプリケーション (以 
下， SX アプリケーション） の 第 1 弾で ある Easypaint - SX 68 K によって， それが もはや 
問題では ない こと を 見て とる こ とがで きます （15 ページ 図 5)。 Easypaint では 複数の ウイ 
ンド ウ上 でイ メー ジを 茅扁 集す る こと が 可能です が， ウインドウ 間で 任意の 範囲の イ メー ジをス 
クラップを 経由して やりと りする こと 力 5 ' できます。 

また， Easypaint の 表現力 はかな りの も のが ありま すが， こ れは Easypaint の 持つ 力 
ではなく， 改良され た グラフ イ ック マネージャ による 部分 力す 大きい のです。 
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Oil のこと から， SX1.02 で 問題と 思われた 部分の 多くは SX1.10 によつ て 解決， あるい 
は 改善され ている ことが わかります。 これは すなわち， SX-WINDOW の 利用 範囲が さらに 
広がった， という ことを 意 〇 未して います。 

SX1.10 には 多く の 新しい 機能が 追加され ています。 それらに ついては 第 2 章 以降で 解説 
する ことにし ましよう。 



COLUMN | SXWIN . X の 未 公開 オプション 

SXWIN . X を 起動す る 際には， コマンド ライ ン 上で いく つかの オプ ショ ンを 指定す る こと 
がで きます。 マニュアルには/ E と/ M が 掲載され ています が， このほかに/ K ， / G などが 有 
効です。 

/K キー ポー ド マネージャの OldOn の 初期 状態を 丨 とする 

/G < num > 画面 モ ー ドを 指定す る 

< num > は 次の ような 値を 指定す る 
bit 5 4 〜〇 


□ □□□□□ 

表示 画面 

表示 色 

同期 周波数 

実 画面 

1 0 

512 X 512 

16 色 

31 kHz 

I 024 X 1024 

1 

512 X 512 

16 色 

15 kHz 

1024 X 1024 

2 

256 X 256 

16 色 

31 kHz 

I 024 X 1024 

3 

256 X 256 

16 色 

15 kHz 

1024 X 1024 

4 

512 X 512 

16 色 

31 kHz 

512 X 512 

5 

512 X 512 

16 色 

15 kHz 

512 X 512 

6 

256 X 256 

16 色 

31 kHz 

512 X 512 

7 

256 X 256 

16 色 

15 kHz 

512 X 512 

8 

512 X 512 

256 色 

31 kHz 

512 X 512 

9 

512 X 512 

256 色 

15 kHz 

512 X 512 

10 

256 X 256 

256 色 

31 kHz 

512 X 512 

II 

256 X 256 

256 色 

15 kHz 

512 X 512 

12 

512 X 512 

65536 色 

31 kHz 

512 X 512 

13 

512 X 512 

65536 色 

15 kHz 

512 X 512 

14 

256 X 256 

65536 色 

31 kHz 

512 X 512 

15 

256 X 256 

65536 色 

15 kHz 

512 X 512 
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768X512 

16 色 

31 kHz 

I024X 1024 

17 

1024X424 

16 色 

24kHz 

I024X 1024 

18 

1024X848 

16 色 

24kHz 

I024X 1024 


0 表示 画面 モード 

1 実 画面 モード 


91 ページで 述べる ように， SXWIN . X と SXWDB . X は 同じ ものです。 外部 カーネル とし 
て SXWIN.X ( SXWDB . X ) を 起動す る 場合には， 以上の ほかに， 次の オプションを 指定す 
る こ とがで きます。 


/D 

SXWIN.X (SXWDB.X) を デバッグ モードで 起動。 シェルを 起動した プログラムを タスク 
と して 再起動す る。 SXWDB.X と して 利用す る 場合には 必ず 指定す る こと 

/R 

リソ 

ースの オープンの 指定 


/RI 

SYSTEM.LB を オープン する 


/R3 

SYSTEM.LB, BUILTIN 丄 B を オープン する 


/R5 

SYSTEM.LB, ICON.LB を オーブン する 


/R7 

SYSTEM.LB, BUILTIN.LB, ICON.LB を オーブン する 


/L リ ソースの メモリへの ロー ドの 指定 

/L0 リ ソースを メモリに ロー ドし ない 

/LI SYSTEM.LB を メモリに ロード 

/L2 BUILTIN.LB を メモリに 口ード 

/L3 SYSTEM.LB, BUI1_TIN 丄 B を メモリに 口ード 

/ L 4 ICON . LB を メモリに ロード 

/L5 SYSTEM.LB, ICON.LB を メモリに 口ード 

/L6 BUILTIN.LB, ICON 丄 B を メモリに 口ード 

/L7 SYSTEM.LB, BUITIN.LB, ICON.LB を メモリに ロード 

_ MH | シェルの 未 公開 操作 

すでに ご存じの 方 も 多い かとは 思います が， SXl . lOt なって， システム アイコン， デス 
タト ップ アイ コン， ページ アイ コンを ドラッグ する こ とが 可能に なり ま した。 

[0 PT .1] キーを 押しながら， それぞれの アイコンを 左 ボタンで ドラッグして， お好みの 
位置に 配置して く ださい。 
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プログラミングの 補足説明 


SX - WINDOW の アプリケーションの 開発に ついては， 前著 
『 SX - WINDOW プログラミング』 でも ひととおり 解説し ま 
したが， ここでは さらに 実践的な 解説を 行い， 『 SX - 
WINDOW プログラミング』 での 解説を 補足す る ことにし ま 
す。 



SX アプリケーションの 発想 


SX - WINDOW の 具体的な プログラム 作りに 入る 前に， わたしたち 人間の 発想を どのよう 
にして SX - WINDOW の アプリケーションに 反映 させて 行く のかを 考えて みまし 丰 ろ〇 
SX - WINDOW の プログラム 作り だけでなく， アプリケーションを つくる 人に とって 大切 
でし かも 切実な 問題の はずです。 

最初は， 一 白 勺な 3 舌から 始め ま しよう。 

プログラムを つくる という fNI には， 人間の 頭の 中身 （の ごく 一部） を コンピュータ 上に 移 
植 し， 目に 見える ように するとい う 側面が あります。 聚^した 職人さん の^! の 段取り や テク 
ニックを プログラム 化 1 して ロボ ッ トに 移植して やる こ とに より， ロボ ッ トは 職人さん と 同じよ 
うに 働く ことができる ようになります 0 また， 物理^# の 理論を プログラム 化 ^ して シミ ュ レー 
シ ョンを 繰り返す ことによって， その 正し さを 検証す る ことができます。 

ところが， 現在の ノイマン型の コンピュータは， 人間の 頭脳とは まったく 違う 方法で 計算 や 
データの 力 〇： を 行って いるた め， 人間の 頭の 中を プログラム 化する といっても， そうかん たんな 
ことではありません。 たとえば， ”2X3” という 計算で あれば， 人間の 場合は よく わからない 
複雑な 過程を 経て， しかも， それを 意識す る こ ともなく， かんたんに” 6” という 答えを 出す 
ことができます* 1 。 これを コンピュータで 行う とすると， 賢明な 読者の 皆さんで あれば， か 
ん たんに 


move.w # ZAO 

mnlu It 3，d0 


のよう な プログラムを 導き出す ことができ ると 思います。 しかし， この 言 t 算の 方法は， 人間が 
頭の 中で 行って いる 方' 法とは まったく 別物で' あろう ことは ほぼ 間違い あり ません。 このような 
プログラムを 導き出す こ とがで きたのは， 皆さんが 頭の 中で 行って いる 計算の イ樸を 逐一 追っ 
ていった 結果では なく， 「コンピュータで 計算を 行う 場合， レジスタに 値を 入れて 計算 命令を 
実行 すれば よい」 という 知識が あった からに ほかな りません。 つまり， 計算と いう 「概念」 か 
ら 「コンピュータでの やりかた」 という 知識への 橋渡し， という 変換 プロセスを 経た 結果で あ 
ると いえる でしよう。 

*丨： 日本人の 場合， 「にさんが ろく j という テー ブルを 參 照して いる ケースが 多い のだろう という 予想 
ま では 可能です が， こ の テー ブルに アクセス する ま での 過程 やその 方法が 明ら かにな るた めには 專 
門 家の 先生たち の 研究を 待つ ほか あり ません。 
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いまの 例の アセンブラの ような， コンピュータの 世界の 中で も， いわゆる 低級な ところでの 
「やりかた」 に 「概念」 を 変換して いくのは， コト バの 使い方が かけ 離れて いると いう 意味で， 
多 かれ 少な かれ， 人間に とって 苦痛です。 この コト バの 距離を いくらか でも 縮める ために， 高 



1 SX アプリケーションの 発想 


級 言語!: 呼ばれる ものが 登場して 〈る わけです が， それでも 事の 本質は 変わりません。 人間の 
頭の 中に ある， ぐに やぐに やした 概念を， きちんとした コンピュータの 世界の 铸 型には める た 
めに， コト バは コミュニケーションの 手段とは なります が， その 内容 こそが 問題 だからです。 

プログラム カ 5 ' 上手に 組める かどう かは， この 「根 fet：」 をい かにう まく 分析で きる か， そして， 
それを いかに 上手に 「コンピュータでの やりかた」 に 変換す るかに かかって います* 2 。 後者 
は， いってし ま え ば, 機械的な 経験の 蓄積の 問題で あり， 多くの プログラムに 触れる こ とで，” あ 
る 程度” の レベルには 誰でも 到達で きる はずです 0 問題は， 前者です 0 後者の 経験を 活かす た 
めには， 「概念」 を 分析し，' 深く 考える 習慣が 必要と なって くるで しよう。 逆に， はじめに 「概 
念」 をよ く 分析して おきさえ すれば， それ 以降の イ^! がかな り 楽になる という こと もで きます。 
おそらく， 今後， プログラム 開発の 自動 化が 進む にしたがって， 人間の 仕事は 前者に 集約され 
ていく こ とでし よう。 決ま りきった ような 处理 であれば， すべて コンピュータが 自分で プ ログ 
ラムを 生成して しまう こと も 十分 考えられます。 人間が プログラムを 組む 意味は， まさに この 
根 を 分析す る ところに こそ あるので す。 

*2: 組織的に ソフト ウ I アを 開発す る 場合， 分業 体制で 作業を 行う わけです が， 前者を システム エン ジ 
ニアが， 後者を プログラマが 担当して いると 考える ことができ ます。 


さて， ”棵 fct: の 分析” などと いう 固い 言葉を 使って しまいました が， その ポイントを 平たく 
いえば， 「どんな プログラムを つくりたい のかを はっきりさせる」 ことに 尽きる と 思います。 
SX-WINDOW の アプリケーション （以下， SX アプリケーションと 呼びます） も コン ピュー 
夕の プログラムに 違いは あり ません から， その 開発は ここから スター ト します。 

とりあえず， これから 始める 解説の ための 例と なる プログラムを 決めて おき ましよう。 SX 
アプリケーション としての 一 « 殳丨 生を 持ち， かつ， 掲載で きる 程度に 小規模で， 実用的で も ある 
ものと して， いわゆる 「時計」 プログラムを つくる ことにします。 標準で SX-WINDOW に 
付属す る 「時計. X」 も ある ことです から， 多少 ひねった ものにし ましよう。 

この 段階では， かならずしも コンピュータに 向かう 必要はありません。 下手に コンピュータ 
が 使える 状態で そばに あると， よ く 考えない うちに コードを 書き 始めて しまう 場合 もあります 
から， むしろ コンピュータは 電源を切って， 紙と エン ピツ だけで^！ を 行う ほうがよ いか もし 
れ ません* 3 。 

*3: 自戒を 込めつつ…。 


SX アブ 1 J ケー シヨ ンの 発想 


SX アプリ ケーシ ヨンは， 従来の Human 用の プログラムと はずい ぶん# •が 異なり ます。 
Human 用の プロ グラム の 場合， ユーザ か らの 1 行 文字列 を 入力して もらう 必要が できた 
とき， C であれば， 


gets(strmgs); 
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t 書けば すみました。 しかし， SX アプリケーションでは こうはい きません 3 なぜ'， SX での 
やりかたが 異なる の 力％ どう すれば よいの かを 考える 前に， 逆に， なぜ Human 用の プロ グ 
ラムは これでい いの かを 考えて みる こ とに しまし よう。 

Human は 従来の キャラクタ ベースの イ ンタ フェースを 想定した 〇 S を モデルに つく られ 
ています。 もともと， そういった システムと いうのは， tty 装置と いう タイプライタの イ 匕け 物 
のよう な 装置に 端を 発して おり， 人間との コミュニケーションと いえば， コンピュータ 側が 1 
行たず ねる （タイプライタの 化け物が 1 行 打ち出す） と， 人間が 1 行 答える （キーボードを 
バチバ チ 打って 改行 キーを 押す） といった 程度の ものでした。 Human の DOS コールを 眺め 
ている と， その を 認める ことができ ると 思います。 

このような 状況 下では， 人間からの 入力を 待つ という ことは， ごく 素朴に， リターン キーが 
押される まで 入力され た 文字を バッファリング する， という 悠長な ものでした。 シングル タス 
クの〇 S という こと も あって， ほかの プログラムが CPU 時間を 求めて せかして いる わけで 
はない し， プログラムは 悠 々と 自分の 仕事に 専念す る こ とが 許されて いたのです。 

しかし， 時は 流れて， 世は GUI の 時代に なりました。 GUI というのは， 要するに， 使う 
人間の 自由度が 増す， くだけた 言い方を すれば， 人間の わがままを コンピュータは すべて 聞い 
て やらなければ いけない， という ことに ほかな りません。 人間は， ロール 紙の 端で'， コン ピュー 
夕が 聞いて くる 質問に 答える だけの 生活には 鮑き 飽きして います。 もっと 積極的に， 画面 上に 
いくつ も 表示され ている 操作^ ネルの あっちを （マウスで） 押し， こっちに （キーボードで） 
書き込み， 自由に 仕事を したいと 考え るよう になった わけです。 

こうなる と， コン ピュ ー タも 悠長に リタ ー ンキ ー を 侍って いる わけには いきません。 人間の 
動きに つねに 気を 配って， ここを （マウスで） 押されたら こういう 仕事を して， キーボード か 
ら 文字が 入力され たら 適当な 場所の 文字列に 追加して …… という ぐあいに， めまぐるしく 働 
かなくて はいけ なく なり ま した。 

先 ほどの gets 0 のよう な 方法は， GUI には 不向きです。 gets 0 で 人間が 1 行 入力し 
終わる まで， ほかの 仕事が 何もで きないから です。 移り気な 人間は， 入力して いる 途中で， 画 
面 上の どこかの ボタンを 押した く なる かも しれません。 GUI を 標榜す る プログラムなら ば， そ 
れを 許さなければ ならない のです が， gets () では どうに もな りません。 

そこで， 人間の 気まぐれな 行動に 逐一 対応す るた めに 採用され たのが， SX-WINDOW の 
場合， イベント という わけです。 人間が マウスの ボタンを 押したり， キーボードの キーを 押し 
たりす るた びに， プログラムには イベントと いうかた ちで 通知され ます。 プログラムは そのた 
びに， それに 応じた 行動を とれば， 人間の わがままに 追従す る ことができます。 

すなわち， gets 0 のか わりには， 

イベント 発生まで 待つ。 

•レフ ト ダ、 ウン イ ベン ト だったら… 

•ライ ト ダウン イベント だったら… 
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•キー ダウン イベント だったら， その キー コードを 文字列に 追加す る。 リターン キー だっ 
たら， 文字列の 入力 处理を 終了して 次の ステップに 進む。 

という 处理 の 流れが 考 えられます。 

SX アプリケーションを つくる 場合は， 人間が ある 行動を したと きには どのよう に 対応した 
ら よい 力、， という 視点で ものを 考える ことが 必要で ある ことを 肝に 命じて おいてく ださい。 


ブロ グラムの 基本 仕様を まとめる 


開発が 始まった いまの 時点で 決まって いる ことと いえば， 

• SX- WINDOW 上で 重财， する 時計 
•” 時計. X” よ りは 多少 ひねる 

という 2 点 だけです。 これでは あまりに 曖昧です から， もう 少し 中身を 詰めて みまし よう。 

• デジタル 時計と する 

アナログ 時計の ほうが プログラム としては おも しろくな ります が， 針を 描画した りする 手法 
を 解説す るの が 目的では ない ことと， コードが 大きく なって しまう ことから， テ'' ジタ ル 時計)： 
する ことにし ま した。 

「多少 ひねる」 という 点に ついて， もう 少し 明確に して， 

• 12 時/ 24： 時制を 切 り 替え 可能と する 

•毎 正 時に 時報を 鳴らす。 時報の on/off も 切り替え 可能と する 
というと こ ろで いかがで しよう か。 

また， SX-WINDOW の 特徴の 1 つで ある， 「SX-WINDOW 終了 直前の 環境が 次に 起動 
したと きに#^ される」 という 点 もき ちんと サポート する こ とに しまし よう。 具体的には， 

- 1Z 時/ 24 時制の 設定 や， 時報の on/off の 設定な どを， SX-WINDOW を 終了 しても 
言 己 憶して おく ようにす る 


という ことです。 

基本的な 仕様と しては， この® めて おけば 十分で しよう C 
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ユーザー イ ンタ フェースを 決める 


SX アプリ ケー シ ョンは， ユーザに とって 使いやす いもので なければ なり ません。 前著 『 SX - 
WINDOW プログラミング』 （以下， 『 SX - WINDOW 〜』 とします） でも 述べた ように， そ 
のために アプリケーション 作成者が 意識し なければ ならない 約束事 （ガイドライン） が 定めら 
れ ています。 ユーザー インタフェースを 設計す る 際には， 『 SX - WINDQW 〜』 の 230 ペー 
ジ 以降の 言 を 参照し， こ れに 準ずる ようにして ください。 

Rh のこと を 頭に 置いて， 私たちの 「時营 f 」 の ユーザー インタフェースを 決める ことにし ま 
す 。 

なんらかの 情報を 表示す る 場合， SX - WIND 0 W では ウインドウを 開いて， そこに 描画を 
行う ことが 原則と なって います。 私たちの 「時計」 も 例外ではありません。 

ウインドウ 内部に 表^す る 情報と しては， 時刻， そして AM / PM 表^が 挙げられます。 こ 
れ だけで したら， ウインドウ ID $10 の 時計 用 ウインドウ でもよ いのです が， 12/24 時 時 
報 on / off を 設定す るた めの コント ロールを 置く ことを 考えて， ウインドウ ID $20 の 標準 
ウインドウを 使う ことにします。 

こう して 紙の 上に ウイン ドウ 内部の 情 癖の 配置を 描いて みたの が 図 1 です。 


■図 1 画面 設計の 例 
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ウィンドウ 下部には， 12/24 時 M を 設定す るた めの ラジオ ボタン* 4 ， 時報 on / off を 設定 
する ための チェック ボックス* 5 が 並んで います。 これらは， 設定す る 情報の 性質に したがつ 
て コント ロールの 手聖 頃を 決めて います。 

*4:「5ズ-以旧00西〜」では， 「セレ ク ト ポタン」 と 呼んで いました が， 用語が 変更に なりました （36 ベー 
ジの コラム 参照）。 

*5:「SX-WIND0W 〜 」 では， 「オルタ ネイ ト ポタン」 と 呼んで いました が， 用語が 変更に なりました （36 
ページの コラム 参照）。 
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ラジオ ボタンは， 「12 時® J 」， 「£4 時® J 」 という タイトルの ついた £ つを 1 グループ とし， 
どちら か 一方を 選択し ます。 チェック ボックスは， 「時報」 という タイトルの ついた ものの 0 n / 
off を 選 J 尺す る ことで， 時報を 鳴ら す/鳴 ら さない を 決定 します。 

文字 や ボタンを 配置す る 座標を 正確に 決めて おく 必要は あり ません。 だいたいの 座標を 決め 
ておいて， 後て' 調整 するとよ いでし ょう。 

[4 イ ベン トへの 対応を 考える 

『 SX - WINDOW 〜』 でも 述べた ように， SX アプリケーションは 「イベント 駆動 方式」 に 
よって 動作し ます。 アプリケーションが 対応すべき イベントには どのよ うな ものが あった か， 
思い出し てみ てく ださい。 

•アイ ドル イベント 
• レフ ト ダウン イベント 
• レフ ト アップ イベント 
•ライ ト ダウン イベント 
•ライ ト アップ イベント 
• キー ダウン イベント 
• キー アップ イベント 
• ァップデート イベント 
• アク テイ ベイ ト イベント 

• システム イベント 1 
• システム イベント 2 


-► ほかの イベントが 発生して いない こと を 示す 
■4 マウスの 左ボ 'タンが 押された とき に 発生 
-4 マウスの 左 ボタンが 離された ときに 発生 
— マウスの 右 ボタン カす 押された とき に 発生 
-4 マウスの 右 ボタンが 猶 された とき に 発生 
4 キーボードが 押された ときに 発生 
4 キーボードが 離された ときに 発生 
■4 アップデートが 発生した ときに 発生 
-► ウインドウが アクティブ になった ときに 発生 
タスク マネージャ や， ほかの タスクから 
] メ ッ セージが 送られて きたと き に 発生 


の 11 個が ありま した。 

これらの それぞれに ついて， 私たちの 時計が どのように 対応すべき か， 考えて みまし よう。 
やはり， 紙な どを 用意して， 「この イベントでは， このような 順番で， こういう 处理 をす る」 的 
な ことを 書き出して ぉく とよいで しよう。 

〇 アイド ルイ ベン ト 

アイドル イベントは， ほかの イベントが 発生して いない 場合に， 定期的に 発生す る イベント 
です 。 ' 

アイ ド ルイ ベン ト 以外の イベントは， その イベントを 発生させる 出来事が 起こった ときには 
じめ て 発生し ます。 この 出来事は 続け ざまに 発生す る わけでは ない ので， これらの イベントは， 
ある 程度の 一定で ない 間隔を ぉいて 散発し ます （24： ページ 図 2 ( a ))。 アイドル イベントは， 
その 間隔を 埋める ようにして 発生し ます （24 ページ 図 2 ( b )) 0 
SX アプリケーションは， 何 か イベントが 発生したら， 短い 時間 だけ， それに 対応す る 仕事 
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を 行い， その 仕事が すんだら， すみやかに イベント 待ちに 戻る ことが ガイドライン によって 求 
めら れ ています。 すべての SX アプリケーションが， そ 9 ルールを 守る ことによって， マル 
チ タスクが スムーズに 行われる こ とに なり ます。 このよ うな 仕事の しかたを 決められ ている 
SX アプリケーションに とって， アイ ドル イベントは 特別な 意味を 持って います。 

アイドル イベント 以外の イベント， たとえば， レフト ダウン イベント によって だけ 動作す る 
アプリケーションを 考えて みま しょう。 

レフト ダウン イベントは， マウスの 左 ボタンが 押されない かぎり 発生し ません。 したがって， 
この アプリ ケー ショ ンはマ ウスの 左 ボタ ンが 押された とき にだけ 少 し 仕事を して， そのわず か 
な 時間 以外は 延々 と イベント 侍ち を 繰り返す ことになります。 イベント 待ちの 間， アプリ ケー ショ 
ンは 停止して いるよう に 見えます から， 表面的には なにも 仕事 も していな いよ うに 見えます。 

このよう な 動作で も かまわない アプリ ケー シ ョンは たく さん あり ます。 たと え ば， SX - 
WINDOW に 標準で 付属す る ユー ティ リ ティな どは 大部分が この類いです。 ” タイプ . X ” は 
スクロール バ、一 を 操作し ないかぎ り じっとして いますし * 6 ， ” コント ロール パネル. X ” もボ 
タンを 左 クリックし ないかぎ り 何も していな いよう に 見えます。 つまり， これらは ユーザから 
働き かけない かぎり， 動作して いないのと 同じ ことになります。 しかし， このような 動作では 
困る タイプの アフ °リ ケーシ ョン もこの 世には 存在し ます。 

*6: SXI . I 0 からは 表示され ている 文 耆をク リック， ドラッグして 内容を カット & ペース トで きる よう 
になって いますから， この 表現は 正確では あり ません。 

たとえば， ”暁 子. X ” です。 起動して みて， しばらく 手を 触れずに 画面を 眺めて みて くださ 
い。 手を 触れて いない， つまり， イベントを 発生させる 出来事を 起こして いないに も かかわら 
ず， ウインドウの 中では 暁 子さん は 自転車で 走り続けて いるは ずです。 このような， ある 程度 
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リ アルタ イムに， 「勝手に 動く」 よう な 動作を 行わなければ ならない SX アプリ ケー シヨ ン は， 
アイドル イベントを 受け取った ときに， その 動作を 部分的に， 少しずつ こなして いくのが 定石 
です 。 

”暁 子” の 場合なら ば， アイドル イベントの たびに， プログラムは 次の ような 处理を 行って 
いるは ずです。 

1) イベント レコードから イベントの 発生した 時刻を 得る 

Z ) 前回 暁 子さん の 絵を 書き換えた ときに 保存して ぉいた 時刻!: 比較して， ある 一定 時間 以 
I 過して いるか どうかを 調べる 
経過して いなければ， そのまま イベント 侍ち に 戻る 

3) ある 一定 時間が 経過して いた 場合， 前の 暁 子さん の 絵を 消して， 次の 位置に 描画す る* 7 

4) 今回の イベント 発生 時刻を 保存して イベント 待ちに 戻る 

*7: 暁 子さん が 自転車を漕いで いるよう に 見せる ために， 前回とは 異なった 絵を 描画して いるは ずで 
す。 また， 実際には 暁 子さん だけでなく， 犬の 移動 処理 も 行って いるは ずです が， ここでは 割愛 
します。 


このような & 理を アイ ドル イベントが 発生す るた びに 行う ことによって， 子さん は 一定の 
時間 間隔で， 少しずつ 移動す るであろう ことは おわかり いただける と 思います。 

私たちの 時計に も， このような リアルタイム 的な， 「勝手に 動作」 する 部分が あります。 い 
うまで もない ことです が， 時刻の 表示は 少なくとも 1 秒 ごとに 書き換えなくて はいけ ないか 
ら です 0 先 ほど 暁 子さん の アイドル イベントの 处理を 挙げたよ うに， 私たちの 時隋 十の アイドル 
イベント 発生 時の 处理を 考えて みまし よう。 流れと しては， ほとんど ”暁子 .X” と 同じです。 

1) イベント レコードから イ ベン トの 発生した 時刻を 得る 

イベント レコー ドに 収められ ている 時刻は， SX-SYSTEM が 立ち上がって からの 経 
過 時間を！/ 100 秒 単位で 示した ものです から， 時刻表 示の 書き換え タイ ミン ダを 計る 
目安には な ります が， その ま ま P # 刻と して^^に 丨 荒 用で きる わけでは あり ません。 

Z ) 前回 時刻表 示を 書き換えた ときに 保存して おいた 時刻と 比較して， 1 秒 以上 経過して い 
るか どう かを 調べる 

経過して いなければ， そのまま イベント 侍ち に 戻る。 

イベント レコー ドに 収められ ていた 時刻と， 前回 保存して おいた 時刻を 上嫩 して， 1 秒 以上 
経過して いるか どうかは 

(今回の 時刻 一前 回の 時刻） 盔 100(10) 
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という 条 f 牛 式を 評価す る こと で 確かめる こと がで き ます。 こ の 式を 評価した 結果が 真の 場合， 
前回の 書き換え 以来， 100 X 1/100 秒 =1 秒 過して いる ことにな り， 次の 処理で ある 
時刻表 示の 書き換えを 行います。 逆に 結果が 偽で ある 場合は， また 賓き 換えを 行う 必要がない 
ので， そのまま イベント 待ちに 戻ります。 

3) 前の 時刻表 示を 消して， 現在 時刻を 描画す る 

SX コールには 現在 時刻を 得る という 機能は 用意され ていないので， IOCS コールを 利 
用す る こ とに なり ます。 IOCS コールの $56 番で 得られる 時刻は 特殊な 数値で 返って 
く るので， IOCS コールの $57, $5B 番を 呼び出して， これを 文字列に 変換し ます。 こ 
う して 得られた 文字列を ， SX コールを 利用して ウィンドウ 内に 描画す る わけです が, 
その 前に 前回 描画した 時刻を 背景 色で 塗り潰し， 消して ぉく こ とを 忘れて はいけ ませ 
ん * 8 。 キャラクタ 型の ディスプレイ 装置を 使い慣れ てきた 方は 注意が 必要 かも しれ ませ 
ん〇 

この 姓理は グラフ ィ ック マネージャを 利用す る だけな ので， ここで 細かく 説明す るまで 
も ないで しよう。 

*8: SX - WIND 0 W では， 文字列を 表示し， その後， 同じ 場所に 文字列を 上書きす ると， 文字が 「重ね 打 
ち」 状態に なって しまい ますが， Human の 場合は， 前に 表示され ていた 文字列は 完全に 消えて し 
まい， 後から 書いた 文字列 だけが 残ります。 

もっとも， Human にか ぎらず， キャラクタ 型の （または それを エミュレートした） ディ スプレ 
イ 装置では， 一般に， このように 「重ね 打ち」 状態には なりません。 

4) 今回の イベント 発生 時^を 保存して イベント 待ちに 戻る 

この イベントが 発生した ときに， イ ベン トレ コードの 中に 納められ ていた システム 時刻 
を ワークの 中に 保存し ます。 この 値は， 次に アイドル イベントが 発生した 際の 幻 のス 
テップ にぉいて 参照され る ことになります。 

Rh のよう な 処理で， 見かけ上， どのような 動作が 実現で きる か， あらためて 説明す る こと 
もないで しよう。 

さて， 時刻の 書き換えの ほかに， 私たちの 時計には もう 1 つ， リアルタイムに 行わな けれ 
ばなら ない 仕事が ありました。 それは， _ を 鳴らす 時刻の チェックです。 時^は 刻々 t 変化 
する ので， 少なくとも 1 秒 ごとには 時報を 鳴らす かどう かを 調べなければ なりません。 とい 
うこと で， 時刻が 変イ 匕す るた び， すなわち 時刻の 表示を 書き換える たびに， それが 正 時 （XX 
時 00 分 00 秒） であるか どうかを 調べ， そうであった 場合は _ を 鳴らす， という 理を行 
うこと になります。 私たちの 時計では， _ を 鳴らす か 鳴らさな いかを 設定で きる ようになっ 
ている ので， その 設定を 調べて， 時報を 鳴らす 处理を 行う か 行わない かも 決めなければ なり ま 
せん。 

先 ほどの 处理の 流れの 中の 3) と 4) の 間で， 次のように 处理を 行います。 
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3.5) 綱を 鳴らす かどう 力、 調べる 

鳴らさなくて よい 場合は， 4) へ。 

鳴らす 場合は， 時刻の 分， 秒の 桁を 調べて， 両方と も 0 の 場合， BEEP 音を 鳴らす。 

L：JLh で アイ ドル イベントで 行うべき 处理が 決まり ま した。 必要と 思われる ワーク エリアの 見 
当 もつ いてきた ので， それ も 紙に 記録して おきます。 


❷ レフ ト ダウン イ ベン ト 

レフ ト ダウン イベントは， マウスの 左 ボタンが 押し込まれた ときに 発生す るイ ベン トです 0 
私たちが マウスの ボタンを 操作 するとき， 「押して 離す」 を 1 アクション として とらえて いま 
すが， SX- SYSTEM に とっては， 「押す」 ことと 「離す j ことの， £ アクション として 認識 
されて います。 レフト ダウン イベントは， このうち の 「押す」 が 起こった 場合に 発生す るイべ 
ン ト である ことを 明確に 理解して おいてく ださい。 

時計と して 動 {，する ための 必要 最低限の 处理 のうち， 大部分は アイ ドル イベントで 行う こと 
はお わかりいた だけた!: 思います。 しかし， SX-WINDOW という 〇 S 上で 動作す る アプリ 
ケー ション である 以」 1， ほかに も しなければ ならない 仕事が あります。 

たとえば， SX アプリケーションは 原則として ウィンドウ 内部で 動作し ます。 多くの場合， 
標準 ウ ィン ドウ を 利用す る ことになります が， ユーザが ウ ィン ドウ 自体を マウ スで 操作し た 場 
合， 標準 ウインドウ は 次の よう に 動作す る こと が 求め られ ています。 

• ウィンドウ 上で 左クリ ック されたら アクティブになる 

• ドラッグ リージョン 上で 左 ボタンを 押されたら， ウィンドウを ドラッグ 

• クロー ズボ タンを 左 ボタンで 押されたら， ウィン ドウを クロー ズ 

•サイズ ボタンを 表^して いる ウィンドウは， 左 ボタンに よる ダブル クリック， ドラ ッグ' に 
応じて， それぞれ ズームイン/アウト， リサイズを 行う 

以上の 4 つを 見れば わかる ように， ウィンドウ 自体を 操作 するとき には， すべて マウスの 
左 ボタンを 用いる ことに なって います。 つまり， マウスの 左 ボタン カ” 甲され た 場合， その 場所 
によって は， アプリケーションは 純粋な 自分の 仕事 以外の 仕事， いって みれば 「雑役」 的な 仕 
事を しなければ ならない のです。 つまり， ウィンドウは （少なくとも， ウィンドウの 枠と 付属 
物は） 0S という 家の 壁に 張り付いた， 〇 S の 世界の 一部分で すから， そこを 操作され た 場合 
は， 〇 S のた めの イ士 事を しなければ なり ません （28 ページ 図 3)。 

一方， 窓で あると ころの ウィンドウの ガラス 部分 （ウインドウ コンテンツ） から 見えて いる 
のは， アプリケーションの 世界の 風景です* 9 。 ここに 見えて いる ボタン 等の コントロール 類 
も， やはり 左 ボタンで 操作す る ことに なって います。 私たちの 時計 も， ラジオ ボタン 2 つと 
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チェック ボックス 1 つの 計 3 つを 持って います。 これらを 左 ボタンで 操作され た 場合 （= レ 
フト ダウン イベントが 発生した 場合)， アプリ ケー シ ヨンは これに 対応した 処理を 行う 必要が 
あります。 

*9: この あたりの たとえに ついては， r SX - W 丨 NDOW 〜 j の 89 ページを 読み返して みて ください。 

■図 3 ウイン ドウの 概念 



つまり， レフ ト ダウン イベントが 発生した とき， そのと きの マウス ポインタの 位置に したがつ 
て， アプリ ケーシ ヨンは いく つかの？ 4 理に 分岐し なければ ならない こ とに なり ます。 

ところで， レフト ダウン イベントは， かならずしも 自分の ウインドウに 関係が ある 場合 ばか 
りではありません。 まったく 関係の ない， ほかの ウインドウ 上な どで ボタンが 押された 場合で 
も イベントは 通知され ます。 そのため， 実際には 次の ような 流れで 理の 分岐を 行う ことにな 
ります。 


1) イベントが' 発生した とき， マウス ポインタは 自分の ウィンドウ 上に あった のか どうかを 
調べる。 自分の ウィンドウ 上に なければ 関係ない ので， イベント 侍ち に 戻る 

2) ウィ ン ドウは それまで イ ン アクティブだった かど うかを 調べ， イ ン アクティブで あっす こ 
のなら， アク ティべ 一 卜する 

3) マウス ポインタの 位置を さらに 細かく 調べ， ウィンドウ 上の どこであった かを 調べる。 
ウィンドウ コンテンツ 内で あれば， アプリケーション 独自の 处理 を 行い， ウィンドウの 
枠の 上で あ れ ば， 定型 的な ウィンド ウ 操作の 処理に 分岐す る 

4) それぞれの 切; 理が 終わったら， イベント 待ちに 戻る 

どのような アプリケーション も， おおむね， このような 流れで レフト ダウン イベントに 対応 
している と 考えられます。 

いろいろと 調べ ものが 多い よ うに 思えます が， この あたりは 案外かん たんに 調べる こ とがで 
きる ので， 案ずる には およびません。 具体的な コー デ ィングに ついてはし かるべき ときに 述べ 
ると して， ここでは 私たちの 時計の ために， 3) の あたりを もう 少し 細かく 決めて しまい ま 
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しょぅ。 

まず， マウス ポイ ン タカ ? ウイン ドウ コンテンツ 内に ある 場合に ついて。 

私たちの 時計は， 先 ほど も 述べた ように， 3 つの ユン トロー ルを 持って います。 ウィンドウ 
コンテンツ 内での マウス ポインタの 位置と しては， 次の 3 つが 考えられます。 

a ) ラ ジオ ボタン 1 の 上 

b ) ラジオ ボタン 2 の 上 

c ) チェック ボックスの 上 

d ) それ 以外 

d ) の 「それ 以外」 であった 場合， とくにす る ことは 決めて いないので， そのまま イベント 
侍ち に 戻って しまえば よいで しよう。 

a ) 〜 c ) のように コントロール 上で ある ことが'? 萑認 された 場合は， 共通して しなければ なら 
ない 处理 があります。 コント ロールの 多くは， それが 「操作され た」 と 判断す るた めには 「押 
さ れ た」 だけでは 不十分で， 「離さ れ た」 ところ ま で 確認す る 必要が あ ります。 たとえば， 標 
準 ボタンなら ば， 標準 ボタンの 上で マウスの 右 ボタンが 押され， かつ 同じ 標準 ボタンの 上で 離 
された 場合に， はじめて 「操作され た」 ことになります。 同様に， 私たちの 時計で 利用す る ラ 
ジオ ボタン， チェック ボックス も 「操作され た」 ことを 確認し なければ なりません* 1 Q 。 

* 10: このほかの コン ト ロールの 場合 も ほぼ 同様です。 スクロール バー や スライ ドボ リユー ム など， ド 
ラッグで きる 部分 （サム） を 持って いる コン ト ロールの 場合， 左 ボタンが 押されて， 離された と 
きには ドラッグ がすんで いる こと も 考えられます。 

一見， 面倒に 思えます が， 操作され たこと を? 鶴 忍す る SX コールが 用意され ている ので， そ 
れを 呼び出す だけの 話です。 この結果， 結局， 「操作され た」 ことが 確認で きなかった 場合， こ 
こまでの 一連の 操作には 意味がなかった こ とに なり， そのまま イベント 待ちに 戻ります。 

a ), b ) の 場合， ラジオ ボタンの ガイドラインに したがって， 今回 操作され た ボタンを on 
にして， もう 片方は off に するとい う处理 を 行う 必要が あります （図 4)。 そして， どちらが 
on になった かを， ワーク ェリアに 記録し ます。 前回と 異なる 時制を 意味す る ラジオ ボタンが 
on になった 場合， 表示して いる 時刻を 書き換えなければ なりません。 アイドル イベント でも 

■図 4 ラジオ ポタンの 操作 





片方が 押される と 


ど， 丨 



押された ほうが ON となり， 
もう 片方は OFF になる 
* 複数の ラジオ ポタンを 
使う とき も 同様 
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時刻の 書き換えを 行います から， 時刻 描画 ルーチンを サブルーチン として 用意して おく とすっ 
きり します。 

このように， 複数 箇戸 斤で 同じような ことを する 場合， サブルーチン として どんどん 分割す る 
ことは， SX 上に かぎらず， プログラミングの 常道では あります。 もっとも， やりすぎ ると， 
かえって プログラムは 言壳 みにく く なります から， ほどほど にして おいてく ださい。 

c ) の 場合， チェック ボックスの;^ イド ラインに したがって， 操作され る ごとに チェック マー 
クの on / off を 切り替える 処理を 行います （図 5)。 この結果は， 時報を 鳴らす か 鳴らさない 
かを 示す ワーク エリアに 保存し ます。 アイドル イベント 発生 時には， ここを 参照す る ことにな 
ります。 


■図 5 チヱ ック ボックスの 操作 



A 押される と 


チェック マークが ついて 0 N となる 


\ もう 1 度 押される と 


チェ ッ マークが 消 えて OFF となる 


ウインドウの 枠 （と 付属物） の 上に マウス ポインタが あった 場合は， ほとんど 定型 処理で あ 
り， SX コールの 中で 处理 されて しまう ことが 多い ので， あまり 細かくは 考えなくても よいの 
です 力 ? ， 先 ほど 挙げた いくつかの 動作を 行わなければ ならない， という こと だけは 忘れない よ 
うにして ください。 紙の 上には 「ウインドウ に関する 处理 j とで も 書いて おけば， それでい い 
かも しれません。 

レフト ダウン イベントは， どうしても そ れに 対応 して 行うべき 避理が 多くなる 傾向が ありま 
す。 混 舌し しないよ うに， 場合^ けを して 整理す る ことを おすすめ します。 

❸ レフ ト アツ ブイ ベン ト 

SX - SYSTEM が マウスの ボタンの 操作を 2 アクション， 「押す」 +「 離す」 で とらえて い 
る ことは すでに 述べました が， レフト アップ イベントは， f 麦 者の 「離す」 によって 発生す るイ 
ベントです。 レフ ト アップで すから， 左 ボタン ヵ璃隹 された!： きに 発生し ます。 

私たちの 時 看 f の 場合は， この イベント では)： くに 何も しません。 左 ボタンが 離された ときに 
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何を する か， とくに 決めて いません でした。 「コントロールが 押され， 離される のを 確認して 
『操作され た』 ことを 5 萑認す るは ずではなかった の？」 と 思われる かもしれ ません が， コント 
ロールが 「操作され た」 こと を 確認す る 仕事は SX - SYSTEM 力す 行って く れ るので， アプリ 
ケー ショ ン はとく にこの イベントを 利用す る 必要は ない のです。 

レフト アップ イベントを 利用す るのは， 何 かを ドラッグした 場合， どこで 離される かを 知る 
必要が あ る 場合な どです。 

〇 ライ ト ダウン イ ベン ト 
❺ ライ ト アップ イベント 

マウスの 右 ボタンに ついて， レフ ト アップ/ダウン イベント と 同様な 意味を 持つ イベントで 
す 。 

マウスの 右 ボタンは， アクティブな ウィン ドウに 付随す る ポップアップ メニューを 操作す る 
ために 使われます が， 私たちの 時計では ポップアップ メニューを 使いません から， これらの イ 
ベントで はとく に 何も 行いません。 

❻キ ー タウン イ ベン ト 
❼ キー アップ イ ベン ト 

キー ボー ドの キーが 押 しこま れた 場合に 発生す る のが キー ダウン， 離された とき に 発生す る 
のが キー アップ イ ベン トです* 11 。 

文字列の 入力 や， メニューの ショートカット などを 行う アプリケーションで あれば， これら 
の イベント に 対応す る 必要が あり ますが， 私たちの 時計には 関係が あり ません。 

* I 丨 ： ただし， 筆者は キー アップ イベント が 発生す る ところ を 確認 していません。 

❽ アップ デ ートイ ベン ト 

ウィン ドウを 持って いる アプリ ケー シ ョンは， かな らず アップ テ、、 ー トイ ベント を サポートし 
なければ なりません。 アップデート イベントは， デスクトップ 中に 存在す る ウィンドウの 中の 
どれ かに アップデートを 行う 必要 力す できた 場合に 発生し ます。 アップデートに ついて， ここで 
解説を す る ことは しま せん。 ア ップ デート は 重要な 概念です ので， よく わから ない 方は 『 SX - 
WINDOW 〜』 の 95 ページを 参照して く ださい。 

要するに， どのような 欠!: 理を しなければ ならない かと いえば， ウィンドウ コンテンツの 内容 
を 再 描画 すれば よいので した。 ここで も， レフト ダウン イベントの ところで 用意した 時刻 描画 
ルーチンを 流用で きそうです。 

アツ プデー トイ ベント に 対応す る 処理には 一定の 手順が あ つて， 次の よう な 順番で 行 うこと 
が 要求され ています。 


1) アップデート 開始を 宣言 
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Z ) ウインドウ コンテンツ 内の 再 描画 

3) アップデート 終了を 宣言 

再 描画を 行う 前後に， かならず 1) と 3) 力 5 ' 必要です。 これらの 目的には それぞれ SX コー 
ルカ ? 用 意され ている ので， それを 呼び出す だけで よいので すが， それだけ のこと でも 忘れる と， 
SX - SYSTEM 全体に 影響を及ぼす 場合が あるので 注意して ください。 1), 3) は あまりに 
も 当然の こ とです から， 5¢ 理を 書き留めて おく 紙に 書いて おく こ とはない かも しれません。 

2) では， 例の 時刻 描画 ルーチンを 利用して， ウインドウ コンテンツ 内部を 全面的に 書き直 
す ことにします。 『 SX - WINDOW 〜』 でも 述べました が， 全 伸: を 書き直す ようにしても， 実 
際に 描画され るのは アップデート リージョン 内部 だけです から， 無駄な 描画は 行われません。 

ところで， ウィンドウ 内部には 時刻の 表示 以外に も いろいろ 表示し なければ ならない ものが 
あります 0 コントロール や， コントロールの タイトル， そのほかの 文字列 や 枠な ども 描画し な 
ければ なりません。 これらの 描画 も 時刻表 示 ルーチンの 中に 組み込んで しまう と， アイド ルイ 
ベント のたびに たくさ んの 仕事を しな ければ な ら なくなり， SX - WINDOW 全体の スピード 
が 低下す る ことが 考えられ るので， あま りい い 手ではありません。 

しかし， ウインドウ コンテンッ 内を 描画す る 理は 初期化の ときに も 使いそう なので， でき 
れば サブ ルー チンに して おきたい ところです 0 それで， 時刻表 示 用の ルー チンと， 時^ 以外の 
描画 ルーチンの 2 つを 用意して， 幻 では この 2 つを 呼び出す ことにします。 £ つめの サブ 
ルーチンを 用意す る こと も 紙に 書いて おき ま しよう 0 

❾アク テイべ 一トイ ベン ト 

この イベント も アップ デ ー ト イベント 同様 》 ウイン ドウを 持って いる アプリ ケーシ ヨンは か 
ならず 対応し なければ なり ません 〇アク テイべ 一 ト イベントは， デスク ト ップ 中に 存在す る ウイ 
ン ドウのう ちの どれ かの 位置が もっとも 手前に なった （アク テイべ ート された） 場合に 発生し 
ます。 ウインド ウ 群に 上 TM 係の 変化が 起こ ったと き に 発生す ると 考えても よいで しよう。 

この イベントでは， アプリケーションは アクティブ になった のが 自分の ウインドウ であるか 
どうかを 調べ， その 結果を ワーク エリアに 記憶して おきます。 この ワーク エリアの 内容は， 右 
クリック による メニューの 呼び出しの 際な どに 利用され ますが， 私たちの 時計の 場合， 参照す 
る ことは ないか もしれ ません。 しかし， いちおう 決まり文句と 考えて， この 理を 用意して お 
くこ とに します。 

これ 以外に も， たとえば， アクティブで あるときと そうでない ときで 表^の 内容を 変えたい 
という 場合な どに， この イベント で处理 を 行 うこと があります。 

❿ システム イ ベン ト 1 
❿ システム イ ベン ト 2 

システム イベントは， SX - WINDOW 上の すべての タスクを 調停し， 全体: としてう まく 動 
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作 させて いる タスク マネージャからの 指示で あると 考えて よいで しよう。 このため， タスク マ 
ネー ジャイ ベン トと 呼ばれる こと もあります。 しかし， ほかの タスクからの メッセージ も 含め 
る 場合は， システム イベント と 呼ぶ の 力 ? 正しい よう に 思えます 0 

システム イベント 1 と システム イベント 2 の 違いです が， 前者は おもにす ベての タスクに 
関係す る イベントで， 後者は この タスク に 狙い を 絞っ て 発行させる イベント であると いう 点で 
す。 多くの場合， 2 つの イベントを まとめて 理 してし まいます。 私たちの 時計で も， そのよ 
うにし ます。 

これらの イベントには タスク マネージ ャイ ベン トコー ドと 呼ばれる 数 fit が 付随 していて， そ 
の 値に よって 意味が 違って きます。 タスク マネージ ャイ ベン トコードは， 『 SX - WIND 〇 W 〜』 
188 ページで 一覧表に なって います。 この 中で， すべての アプリケーションで サポート しな 
ければ ならない のは， 1 の 「タスクの 終了」， 2 の 「ウインドウの クローズ」， 32 の 「ウイン 
ドウの セレクト」 です。 

これら 3 つに ついては， 次の よう な 手順で 対応で き そうです。 

1) タスク マネージ ャイ ベン トコー ドを 得る 

Z ) 1 ならば， アプリケーションを 終了させる 

3) 2 ならば， 同様に アプリケーションを 終了させる 

4) 32 ならば， ウインドウを アクティブに する 


私たちの 時計の 仕様には， 「 SX - WINDOW 終了 時に 各種 設定を 記憶して おき， 次回に 起動 
したと きに 淨 見す る」 という 機能が ありました。 このうち の 「記憶」 を 行う のが， ここです。 
システム イベントの 中に タスク マネージ ヤイ ベント コード 31» 「現在の 状態を セーブ」 力す あ 
ります。 この コードを ともなって システム イベント カ ? 発生した 場合， アプリケーションは 自分 
の 状態を なんらかの 方法で 保存して， 次回に 起動され たと き， _ できる ように 準備し なけれ 
ばな りません。 

したがって， 

5) 31 ならば， 12 時/ 24： 時 M の 設定， 時報の on/of f など の 状態を 保存す る 

という 处理を 行う ことにします。 具体的な 方法に ついては， プログラムを 設計す る 際に 述べる 
ことにし ましよう。 前回の 状態を _ する 仕組みに ついては， 70 ページの コラムで 解説して 
いますので， そちらを 参照され ると， 理解が より 深まる と 思います。 

最後に もう 1 つ 0 


6) そのほかの タスク マネージャ イベント コードであった 場合は 関係ない ので， イベント 待 
ちに 戻る 
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これを 忘れて はいけ ません。 


必要な 初期化 処理， 終了 処理を まとめる 


さて， Rh で ひととおり 各 イベントへの 対応を 考えて きました。 紙の 上には， それぞれの イ 
ベントで 行う 处理の 内容 や， 用意すべき サブルーチン， 使用す る ワーク エリアの 表な どが 書か 
れ ている こと と 思います （図 6)。 


■図 6 イ ベン ト対応 処理の 整理の 例 


こ* U 水, 女 イべ しつ ー ド 

デ? 机卜 り ィンドり しつ - ド 

伯し 

• ゆ あ 1 ！ の 如” ワ 

• 资 yn 喊 B /10 ば 形 ふ 

• A 女) の 義^、 へ V 

• 的 余 1 】 のつ ぅゲ 

• 崎 姐 M 馬ら 為 \ 

• め报 がつ ラ プ 

• し 7 ト デづン 
• り ベ ニ ド勹の 今 叙 作 

\ • 说、 ノの ピ 
\ 心 VD - 1 しし 少卜 

• ボ％ の餘作 \ 

• 何 ふ 私_綠 : づレ 巧ン？ 

• 矣 、痕^ 典 •表^、 

• 彳 り， べし 卜 
• つぅワ ''め 碌作 

• マワ うづ、 つう ワ 

• シフ 今“ 1.2 

• m 们谈飞 、'’ 

各 穴り 

• 今: ウイン ド'勹仍7〇 -ス 
• 勹 〇ド' 勹⑺ 心し 7 卜 

〖 マネ-ジ、 、 

K 〇 への パ 7 スワ 緣讲 今-ブル） 

• 機， 胁 > 

_ 心ぶ J 

(筆者の メモから） 



これらを うま く 働かせる ためには， アプリ ケー シ ヨンが 起動した 直後に 行う 初期化 奶理 と， 
終了す る 前にす 羑 始末を する 終了 处理 を 用意し な ければ なり ま せん。 

初期 ィ淡理 では， 次の よう な 仕事を 行います。 
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籲 ワーク エリ アの 初期化： 

紙に 書いて おいた ワーク エリ アの 表の 中から 初期化が 必要な ものを 選び出し， 適切な 初期値 
を 代入す るよう にします。 ワーク エリアの 内容は タスク 起動時には 不定です から， 初期化して 


1 SX アプリケーションの 発想 


いないと 予想し ない IW 乍を 行う こ とが あり ます。 

•ウィンドウの オープン 

私たちの 時計 も ウィンドウ 上で 動作す るので すから， 当然， 最初に ウィンドウを オープンし 
て おかなければ なりません。 コマンド ライン 上で’- w ， オプションが 指 1 定 されて いた 場合， ア 
プリ ケー シ ョンは そ の 位置 に ウィンドウを 開かなければ ならない ので， コマンド ライン の 解析 
も あわせて 行う 必要が あります。 

ウィンドウを 開く 際， ウィンドウ レコー ドを 作成す る 場所と して， 任意の アドレスからの 領 
域と， ヒープ ゾーン 中に 作成した 再配置 不能 ブロックの £ 種類 力 5 ' 選べます が， メモリ 効率を 
考え て 前者 とする のが 正解です。 ワーク エリア 中に ウィンドウ レコード を 収める ため の 領域を 
あらかじめ 用意して おいて， その ア ドレスを 指* 定 する ようにす る とよいで しよう* 12 。 

* 12: はじめから ウィン ドウの 数が わかって いる 場合は， このよう な 方法を とるべき です が， 動的に ウィ 
ン ドウの 数が 変化す るよう な アプリケーションの 場合は， ヒープ ゾーンを 利用す るの も しかたが 
ない ところで はあり ます。 

鲁 コント ロー ルの オープン 

ウィンドウ 同樣 コントロール も オープンして おく 必要が あります。 先 ほど 紙の 上に 書いた 
ウィンドウ 上の 情?^ の 配置 図に したがって， コントロールを オープンし， 酉 己 置し ます。 

•初期 画面の 描画 

用意して おいた サブルーチン 2 つを 使えば， 力、 ん たんに 画面 全体を 描画で きる ことは もう 
おわかりでしょう。 それぞれを 呼び出して， ウィンドウ 内部を すべて 描画し ます。 

おおむね， 以上の よ うなと こ ろです が， 私たちの 時計の 場合， もう 1 つす る ことが ありま 
す。 これは， 3) と 4) の 間で 行う とよいで しょう 0 

3.5) 前回の 状態が 保存され ていれば， それを 再現す る 

システム イベント 1 で， タスク マネージ ヤイ ベン ト コード 31 を 受け取った とき に 状態を 
保存し ました。 時計が^® して 初期 イ1^4理 を 行って いると きに， かならず 前回 保^した 「状態 
に関する 情報」 力 5 '存在して いるとは かぎりません が， 保存され ていた 場合， その 情報に したがっ 
て 状態を 再現し なければ なりません。 私たちの 時計の 場合は， 12 時/^: 時制の 設定と， 時報 
の on / off でした。 これらの 情報に したがって ワーク エリアを 設定し， 4) の 画面の 描画を 行 
うこと によって， 前回の 状態 力 ? 完全に 淨見 できそう です。 

そして， 終了 理を する 場合は， 


1) コント ロ ー ルの クローズ 
£) ウィンドウの クローズ 
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を 行って， アプリケーションは 終了す る ことができます。 メモリ ブロックを 作成して いたりす 
る 場合は， ここで 廃棄す るよう にして ください。 

先 ほどの 紙に， 初期化 欠 t 理， 終了 理を 追加す る ことによって， ひととおり プログラムの 構 
成らし きものが 見えて きました （図 7)。 これを もとにして， 実際に どのような コードを 書い 
ていく か， 考えて みま しよう。 


■図 7 初期化 処理， 終了 処理を まとめた 例 

• 初娴也 

•つづの 初 餅/ (匕 

• つ マ i ドう インの 辦灼— つう ヴ 7 乜、 y 卜 
• われ 
• no -/し 

• 抑鈉 办痴 作成"^^ 兮ゲ ， ムづン 

• つ' 〆 VO ，/ し 閑 d 
• う 〇 ドり 續 じる 

(筆者の メモより） 


ある 程度 SX アプリ ケー シ ヨンの 開発に 慣れて きたら， これほど 細々 と した 仕様を 書かな 
くても， ある 程度の 樹莫 までなら， 頭の 中 だけで なんとかなる 場合 もあります。 また， 紙を 使 
わずに エディタで テキスト ファイルと して ま とめ あげる という こと もで きる でしよ う 0 です が， 
矢印を 引っ張ったり， マルで 囲んだり， 柔軟な 表現が 可能な 紙の 上で 考えを 整理す る こ とに よっ 
て， 案外 すっきり した プログラム カ f 書けて しまう こ とが ある こと も 心に 留めて おく 必要が ある 
でしよう。 

C 0 L _| 用語の 変更 

SX-WINDOW の 正式な 用語と， そ れが 定め られる 以前に 使われて い た 用語が 混用 されて 
いるの が 現状です が， 今後は 正式な 用語に 移行して いく 必要が あるで しよう。 

ここで， 旧 用語と 新 用語を 整理して おきます。 

なお， 本文 中では なるべく 旧 用語を 併記す るよ うにして います。 

マウス マネージ ヤ 

•マウス カーソル — ポインタ/マウス ポインタ 

ウィン ドウ マネージ ヤ 

•クロー ズボ ッ クス — クロー ズ ボタン 
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• グロー ボッ クス 
•矢印 

コン ト ロール マネージ ヤ 

• 標準 ボタン 
• オルタネイト ボタン 
•セレクト ボタン 

テキス ト マネージャ 

• キヤ レット 


サイズ ボタン 

-> デイ レクト リ 戻り ボタン 


文字 ボタン 
ラ ジオ ボタン 
チェック ボックス 


カーソル 


COLUMN | SX1 . 10 の 不具合 


現時点で SX1.10 には， 以下の よう な 不具合が 確認され ています。 

なお， カッコ 内は 発見され た 方の お 名前です。 

• $A04C MMMemAmiTPeach が 正しく 動作し ない 

• $A0DC RMRscAdd が レジスタ D3 を 破壊す る （中 村 氏） 

• $AI46 GMExPat で レジスタの 値が 異常 （沖 氏） 

•$AI6C GMlmgToRgn で テキス ト タイプの イメージを 指定す ると， 右端に ゴ ミが 出る 場合が ある 
•$AI7F GMCopy で 縮小が 発生す ると， ゴ ミが 表示され る 場合が ある 

•$AI9F GMCIosePoly で ディスティネーションが ヌル リージョンの 場合， 不都合が 発生す る 

• $AIA7 GMMapRect で 左下 x 座標の 変換に 失敗す る （中 村 氏） 

• $AIAF GMGetPixel の 返り 値の 上位 ビット と 下位 ビッ トが 逆 

• $A 丨 B2 GMCalcFrame で 右端に ゴ ミが 出る 場合が ある 

• $AIBB GMTransImg で ディ ステ ィネー ショ ンが カレン トビッ ト マップで ない 場合， 不都合が 
生じる 場合が ある。 また， 以下の ビットマップ 間の 変換が できない。 

TXT — GRP, TXT — GR2, TXT — GR3 
GRP — TXT, GRP - GR2 
GR2 — TXT, GR2 — GRP, GR2 GR3 
GR3 — TXT, GR3 - GR2 

•$AIBF GMPaintRgn を 実行す る 場合， ヒープ ゾーンに $丨 1000 以上の 余裕がない と 暴走す る 


• $A22I WMGetTID で 正しい 値が 返らない （沖 氏) 

• $A2A3 CMUserSet で 正し い 値が 設定で き ない （沖 氏) 

• $A2A5 CMProcSet で 正しい 値を 設定で きない （沖 氏) 

• $A2A7 CMDefDataSet で 正しい 値を 設定で きない （沖 氏） 


• ダイアログ アイテムと して 編集 可能 テキス ト を 使用で きない 
•フォン ト サイズに よっては 表示 時に ゴ ミが 表示され る 

沖 氏 （NIFTY GGCJ 0241 2)， 中 村 氏 （NIFTY GB A0 275 0)， および 不具合の 発見に ご 協 
力いた だいた 皆さんに 感謝いた します。 
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|| 2 | コードの 組み 5 TC 

I プログラムの 仕様が 決まったら， 次は どのような コードを 書いて それを 実現し たらよ いかを 
考える ことにします。 

[l I スケルトン 

前節で 決めた 仕様に ついて 考え る 前に， 『 SX - WINDOW 〜』 で 登場した スケル ト ン ついて， 
も う 一度かん たんに 解説して おく ことにし ましよう。 

SX アプリケーションを イ乍 製す るう えで， 「プログラミング ガイドライン」 と， 「ユーザー イ 
ンタ フェース ガイ ドラ イン」 という 2 SS 頁の 決ま りごと を 守る こ とが 要求され ます。 前者は， 
SX - WIND 〇 W という 0 S 上の タスクと して 動作す るた めの， 後者は ユーザが すべての アプ 
リ ケー シ ョンを 同様な 方' 法で 操作で き るよう にす るた めの 決まり ごとです* 1 。 

* I : ガイドラインに ついては， r SX - WINDOW 〜 j の 226 ページ 以降を 参照して ください。 

これらの ガイ ドラ インを 忠実に 守ろう とした 場合， そのために 書かなければ いけない コード 
はかなり の 量に およびます。 また， いくつか アプリケーションを 書いて みると， どんな アプリ 
ケー ショ ン でも 似た よう な 部分を 持っ ている こと に 気がつ きます。 アプリ ケー ショ ンが 起動 さ 
れた 直後の 妙理 や， 終了 するとき の 理〇 また， ほとんどの アプリケーションは ウインドウを 
開く でしよう から， ウインドウ まわりの 定型 理 （ウインドウの オープンから， ドラッグ， 大 
きさの 変更な ど） など も， この 範疇です。 

これらの 「似た ような 部分」 は， ほとんどの アプリケーションに 最低限 必要な， 重要な 意味 
を 持つ 部分で あり， プログラム 全体の 成り立ちを 支える 骨組み —— スケルトン という ことが 
できます。 

SX - WINDOW にか ぎらず， ウインドウ 環境の アプリケーションを 書く 場合は， こうした 
骨格を まとめて， 流用 可能な かたちに して 用意して おくのが 普通です。 スケルトン という 語感 
からもう かがえ るよう に， 実際に これを 用いて 開発を 行う ときの 感覚は， まさに 「肉付けす る」 
という 言葉が ふさわしいで しよう。 

スケルトン だけでは 何の 意味 もない， 「ただ 起動して 終了す る だけ」 といった 代物で しか あ 
り ません が， そこに 目的に 応じて さまざまな コードを 付け加えて いくこ とに よって， アプリ ケー 
シ ョンは 生き生き と 動き 出す のです。 

まとめと して， 『 SX - WINDOW 〜』 でも 挙げた， スケル ト ンを 利用す る 3 つの メ リットを 
5 鶴 忍して おき ましよう。 
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1) コードを 書く 童を 減らす ことが' できる 

2) イベント ドリ ブン を 意識す る 必要が 少なくなる 



3) プログラムの モジュール 化が 容易と なる 


2 コードの 組み立て 


『SX-WINDOW~』 に 掲載した， スケルトンを 構成す る 4 つの ファイルの 内容を， リスト 
1~4 に 示します。 

リスト 1 ”SXCALL.MAC” は， SX コールを 呼び出す ための マクロを 定義す る ファイル 
で， SX コー ルを 利用す る ソースの 先頭で イン クルー ドし て 使用 します。 

リスト 2 "WORK.INC” は， ワーク エリアの 内容を 定義す るた めの ファイルです。 ワーク 
エリア を 利用す る ソースの 先頭で イ ン クルー ドし ます 0 

リスト 3 ”SKELTON.S” は， スケルトンの 中核を なす 部分で， モジュール ヘッダ， 非常 
に 下位の レベルの 初期化 理， そして イベント 侍ち ループと， 各 イベント 处理 ルーチンへの 分 
岐を 行います。 『SX-WINDOW 〜』 に 掲載した” SKELTON.S” とは 多少 異なって います 
力' これは SX1.10 になって SXKERNEL.X 力 ? 標準 翁# となった こ とに よ る 変更です。 

リスト 4 ” BODY.S”* 2 は， ” SKELTON.S” から 呼ばれる ルーチンの 集合体で， 初期化 
姓 理， 各 イベントの 处理 ルーチン， 終了 处理 などを 含みます。 多くの場合， この ファイルに 手 
を 加える， あるいは 差し替える ことによって， 目的に 応じた アプリケーションを 作成し ます。 

それぞれの ファイルに ついての 詳細な 解説は， 前著 『SX- WINDOW 〜』 を 参照して くだ 
さい。 注釈を 読んで いただければ， ある 程度 处理 の 流れを 理解して いただけ ると 思います。 

*2:「SX-WINDOW〜j で SMPU.S として 掲載した ものと ほとんど 同じ ものです。 ファイル 名が ここで 
は 適当で ない と 判断した ため リネームした だけで， 内容は ほ とん ど 変わ りありません。 

■ リスト 1 SXCA しし . MAC 


2 * SX - WIND 0 W 用 マクロ 定義 ファイル 

3 t 

4 

5 SXCALL macro num * [ S X コール 呼び出し マクロ] 

6 dc . w num 

7 endm 


■ リス ト 2 WORK.INC 



8 STKSIZE 

9 


3 cmdl i ne : 

4 

5 e n v P t r : 


SX-WINDOW 

サンプル プログラム# 1 

ワーク 定義 用イ ン クルー ド ファイル 


= 2*1024 

ワークの 内容の 定義 
. offset 0 
ds . I 1 


* スタ ック サイズ 


t コマンド ライ ンのア ドレス 
* を 保存す る ワーク 
t 環境の ア ドレスを 
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* 保存す る ワーク 


16 

ds. 1 

1 


17 

winRect: 


本 ウィンドウ 

i レ タ タング ル レコ ー ド 

18 

ds. 1 

2 


19 

paramF 1 g : 


t コマンド ライ ンの 

* 解析 結果を 示す 

20 

ds. w 

1 

* フラグ 

21 

eventRec : 


* イ ベン ト レコ ー ドの 先頭 

22 

eventRec_what : 


* イベント コー •ド 

23 

ds. w 

1 


24 

eventRec whoml : 


* 第 1 引数 

25 

ds. 1 

1 


26 

eventRec when : 


* イベント 発生 時 

27 

ds. 1 

1 


28 

eventRec whom2 : 


* 第 2 引数 

29 

ds. 1 

1 


30 

eventRec_what2 : 



31 

ds. w 

1 

* タスク マネージャ 
* イベントの 種類 

32 

eventRec_task 1 0 : 



33 

ds. w 

1 

* 送り手の タスク 丨 D 

34 

eventMask : 


* イベント マスクを 保存す る 
* ワーク 

35 

ds. w 

1 


36 

task 1 D: 


本 タスク 丨 口を 




拿 保存す る ワーク 

37 

ds. 1 

1 


38 winPtr: 


* ウィンドウ レコー ドを 




t 作成す る 場所 

39 

ds. b 

$72 


40 




41 

winAct i ve : 


* アクティブ フラグ 

42 

ds. w 

I 



43 

44 WORKSIZE: t ワークの 終了 

45 


I リスト 3 SKE し TON.S 


SX-WINDOW 
標準 スケルトン 


i nc I ude 
i nc I ude 


DOSCALL. MAC 
SXCALL. MAC 


9 

. xref 

INIT, TINI 

10 

. xref 

Idle 

11 

.xref 

MS L DOWN, MSLUP, MSRDOWN, MSRUP 

12 

. xref 

KEY DOWN. KEYUP 

13 

. xref 

UPDATE, ACTIVATE 

14 

. xref 

SYSTEM], SYSTEM2, SYSTEM3, SYSTEM4 

15 

16 

17 

18 

19 

20 mdhead : 

. include WORK. INC * ワーク エリアの 内容を 

* 定義す る ファイル 

. text 

t [ モジ : L — ル ヘッダ】 

21 

dc. 1 

* OBJR' t R 型 モジュール 
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2 コードの 組み立て 


22 

dc. 1 

0 

i プログラム エリアの 




t サイズ （ X ファイルの 




t 場合 意味がない） 

23 

dc. 1 

_ma i n-mdhead 

* スター ト アドレス 




* オフセット 

24 

dc. 1 

WORKSIZE+STKSIZE 

本 ワーク エリアの サイズ 

25 

dc. 1 

0, 0. 0, 0 

* システム 予約 

26 




27 DiXstart : 



* コマンド ライ ン から 起動 

28 



* 場合 

29 



* ここから スター トする 

30 

lea 

64(a1), al 


31 

move. 1 

a1 f sp 


32 

lea 

16(a0), aO 


33 

sub. 1 

aO, al 


34 

move. 1 

al, - (sp) 


35 

pea 

(a0) 


36 

DOS 

.SETBLOCK 

* 専有 メモリを 縮小す る 

37 




38 

cl r. 1 

-(sp) 


39 

pea 

comm (pc) 


40 

pea 

shname (pc) 


41 

move, w 

12, -(sp) 


42 

DOS 

_EXEC 

* デバッグ 用 力ー ネルの パス 

43 



t を サーチす る 

44 

c 1 r. 1 

- (sp) 


45 

pea 

comm (pc) 


46 

pea 

shname (pc) 


47 

cl r. w 

-(sp) 


48 

DOS 

_EXEC 

* デバッグ 用 力ー ネルを 

49 



* 立ち上げる 

50 




51 

tst. 1 

dO 

* 正常に 終了した 場合 

52 

bpl 

p_exec i 1 

* そのまま 終了 

53 




54 

pea 

mes_execerr (pc) 

t エラ ー メッセ ー ジを 

55 

DOS 

_PRINT 

* 表示す る 

56 p exec 1 1 : 




57 

DOS 

_EXIT 

♦終了 

58 




59 

. data 



60 mes execerr: 




61 

dc. b 

• カーネルの 起動に 失敗し ました！！ ド， 13. 10,0 

62 

. even 



63 shname : 




64 

dc. b 

• SXKERNEL. X -K -R7 

-l r , 〇 t 力ー ネルの 名前 

65 

ds. b 

70 


66 

. even 



67 




68 

. bss 



69 comm: 




70 

ds. b 

258 


71 



* カーネルは ここから 先の 

72 



ネコー ドを 読み込み、 

73 



* タスクと して 立ち上げる 

74 

. text 



75 main: 



* SX — SHELL から 

78 



* 起動した 場合 

77 

movea. 1 

al, a5 

* ここから スタ ー トする 

78 

move. 1 

a2, cmdL i ne (a5) 


79 

move. 1 

a3, envPtr (a5) 


80 




81 

c 1 r. w 

- (sp) 


82 

c 1 r. 1 

- (s p) 
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97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 
109 


eventTab I e : 


120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 


DAMMY : 


exit: 


wi nRect (a5) 

(a2) 

$A3EA 
14 (sp), sp 
dO, paramF I g (a5) 


bsr JNIT 

bmi _ex i t 


move, w j}$f f f f, eventMask (a5) 

pea eventRec (a5) 

move, w eventMask (a5) , - (sp) 

SXCALL $A357 

addq. I H6, sp 

lea eventTabl e (pc) t al 

move, w eventRec_what (a5) , dO 

and. w 1115, dO 

add. w dO, dO 

move, w (al, dO. w) . dO 

jsr (al, dO. w) 

tst. I dO 

bmi _ex i t 

bra loop 


dc. w I DLE-eventTab I e 

dc. w MSLDOWN-eventTab I e 

dc. w MSLUP-eventTabl e 

dc. w MSRDOWN-eventTab I e 

. dc. w MSRUP-eventTab I e 

dc. w KEYOOWN-eventTable 

dc. w KEYUP-eventT ab I e 

dc. w UPDATE-eventTabl e 

dc. w DAMMY-eventTabl e 

dc. w ACT I VATE-eventTabl e 

dc. w DAMMY-even tTab I e 

dc. w DAMMY-eventTabl e 

dc. w SYSTEM1 -eventTab I e 

dc. w SYSTEM2-eventTable 

dc. w SYSTEM3-eventTab I e 

dc. w SYSTEM4-eventTab I e 


rts 


bsr _TINI 


move, w dO, - (sp) 
SXCALL $A352 

. end DiXstart 


♦ TSTakeParam 

* コマンド ラインを 解析し、 

* *-W* オ プショ ンを 得る 

* アプリ ケー ショ ンの 初期化 
♦ 初期化 時に 
* エラーが あれば 終了 


t メイ ン ループ 


t 一 TSEventAva i I 

t イベントを 得る 


* イベント コードに よって 
* 分岐す る 


* 分岐 先の テ ーづル 

* 0 アイ ドル イベント 

* I レフ ト ダウン イベント 
本 2 レフ トアッ ブイ ベン ト 

* 3 ライ ト ダウン イベント 
本 4 ライ ト アップ イベント 

* 4 キー ダウン イベント 
*6 キー アップ イベント 

* 7 アップ デー ト イベント 

* 8 

* 9 アク ティ ベイ ト イベント 

* 10 一一 

* 11 一一 

i 12 システム イベント 1 
* 13 システム イベント 2 
* 14 システム イベント 3 
* 15 システム イベント 4 


* [ 終了す る 1 
t アプリ ケー シヨ ンの 
* 柊 了 処理 


* TSExit 


8 8 〇〇 8 8 〇〇 8 QU 


3 V 

6 6X60 
p PS I F 
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2 コードの 組み立て 


pea eventRec (a5) 

pea (a2) 

SXCALL $A3A2 

addq. I #8, sp 

tst. I dO 

beq MSLD9 

cmp. w H7, dO 

beq C I oseBt tn 


eventRec_whoml (a5) ， aO 
wi nPtr (a5) , a2 
a 2 ， a 0 
MSLD9 

wi nAct i ve (a5) 


本 [ レフ ト ダウン イベント ] 

* 自分の ウィン ドウ 上で 
* 発生した か？ 

* 違うなら MSLD9 へ 

* 現在 ウィ ン ドウは 
* アクティブ か？ 

* アクティブなら MSLD1 へ 

* — WMSe I ect 

* アクティブに する だけ 


* ウィン ドウ 処理 

* _SXCal IWindM 

* どこも 操作され なかった？ 

* ならば MSLD9 へ 

t クローズ ボタン？ 

* ならば CloseBttn へ 


DOSCALL. MAC 
SXCALL. MAC 


INIT, TINI 

Idle 

MS L DOWN, MSLUP, MS R DOWN, MSRUP 
KEYDOWN, KEYUP 
UPDATE, ACTIVATE 

SYSTEM1, SYSTEM2, SYSTEM3, SYSTEM4 


WORK. INC 


% 0000 
256 
128 


ワーク エリアの 内容 
を 定義す る ファイル 

ウィン ドウ オプ シヨ ン 
ウィンドウ 初期 x 
ウイ ン ドウ 初期 y 


. I nc I ude 


. text 


moveq 

rts 


move. I 
lea 
cmp. I 
bne 

tst. b 

bne 

SXCALL 
addq. I 
bra 


• include 

• i nc I ude 


SX-WINDOW 
標準 スケルトン 

初期化 & 終了 & イ ベン ト 処理 モジュール 


I リスト 4 BODY.S 


8 

9 

0 

1 

2 

3 

4 

5 

6 

7 

8 

19 

20 WIN0PT 

21 WIN—X 

22 WIN Y 

23 

24 

25 IDLE: 

26 MSLUP: 

27 MSROOWN: 

28 MSRUP: 


29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 


KEYDOWN: 

KEYUP: 

SYSTEM3: 

SYSTEM4: 


MSI DOWN: 


43 

44 

45 

46 

47 

48 MSLD1: 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 MSLD9: 


- — E P9 
D • ^ / F s D 

— - 2 - — • ― I 

S 3 A 4 S 


1 ンンン ト ト 3 4 
卜べ ベべ ンント トは 
ンイ イイべ ベン ンで 
ベ プンプ イイべ ベ ト 

イツ ウツ ンプイ インい 
ルアダ アウ ツ厶厶 ベな 
ド ト ト ト ダアテ テイし 
イフ イイ I I ススの も 
アレ ララキ キシシ 上に 

> : ? >> * 丨 L. : > ^#0 

ネネ 本本 本本 ネネ 本本 


XI #T rT fT rT rT 
6 6 6 6 6 6 
d d d d d d 
X X X X X X 
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59 

moveq 

HO, dO 

60 

rts 


61 



62 CloseBttn: 



63 

moveq 

M, dO 

64 

rts 


65 



66 UPDATE: 



67 

pea 

wi nPtr (a5) 

68 

SXCALL 

$A20D 

69 

addq. 1 

R sp 

70 



71 

bsr 

DrawGraph 

72 



73 

pea 

winPtr (a5) 

74 

SXCALL 

$A20E 

75 

addq. 1 

H4, sp 

76 



77 

moveq 

#0. dO 

78 

rts 


79 



80 ACTIVATE: 



81 

move. 1 

eventRec whom! (a5) , dO 

82 

beq 

ACT9 

83 

lea 

winPtr (a5) , aO 

84 

cmp. 1 

a0, dO 

85 

bne 

ACT0 

86 

St 

wi nAct i ve (a5) 

87 

bra 

ACT9 

88 ACTO: 



89 

sf 

winAct i ve (a5) 

90 ACT9: 



91 

moveq 

1(0, dO 

92 

rts 


93 



94 SYSTEM!: 



95 SYSTEM2: 



96 

move, w 

eventRec what2 (a5) , dO 

97 

cmp. w 

11, dO 

98 

beq 

Al 1 Cl ose 

99 

cmp. w 

#2, dO 

100 

beq 

Al 1 Cl ose 

101 

cmp. w 

H20, dO 

102 

beq 

Wi ndowSe 1 ect 

103 



104 

moveq 

HO. dO 

105 

rts 


106 



107 AllClose: 



108 

moveq 

M. dO 

109 

1 1 n 

rts 


IIU 

111 Wi ndowSe 1 ect : 



112 

pea 

winPtr (a5) 

113 

SXCALL 

$AIFE 

114 

1 1 c 

addq. 1 

H sp 

1 1 J 

116 

moveq 

KO. dO 

117 

rts 



t [アップ デー ト イベント】 

t WMUpdate 
* アップ デート 開始 

* ウィン ドウ 内部を 描画 


t WMUpdtOver 
* アップ デ ー ト 柊 了 


* [ アク ティ ベイ ト イベント ] 


t 自分の ウィン ドウが 
* アクティブに なった？ 
本 違う のなら ACT0 へ 
* アクティブ フラグを 
本 セット 


* アクティブ フラグを 
本 リセット 


* [ システム イベント 1 】 

* [ システム イベント 2 ] 

t タスクの 柊 了？ 
t ならば LetsGoAway へ 
* 全 ウィンドウの クローズ？ 
* ならば LetsGoAway へ 
本 ウィン ドウの セレクト？ 

* ならは ' Wi ndowSe 丨 ect へ 


* 自分の ウィン ドウを 
* セレ ク トする 
* WMSe I ect 
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2 コードの 組み立て 


* [ アフ リ ケー シヨ ン 

* の 初期化を 行なう] 


* • - W * オプ シヨ ンが 
* 指定され た？ 

* 指定され ていなければ 
I JNITO へ 

* 正しい レク タング ルが 
* 指定され たか どうか 
* を 調べる 


* TSGetWi ndowPos 
* デフォルト 位置を 得る 

* ウィンド ウレ ク タング ルを 
本 作成 


move. I winRect (a5) , dO 
move, w paramFI g (a5) t dl 
btst #0, dl 

beq JNITO 


move. I winRect+4 (a5)， dl 
beq JNIT1 

tst. w dl 
cmp. w d0 r dl 
ble _INITI 
swap dO 
swap dl 
cmp. w dO, dl 
bgt JNIT2 
swap dO 
swap dl 
bra _INIT1 

SXCALL $A35E 

move. I dO, winRect (a5) 

add. I IWIN_X*$10000+WIN_Y, dO 

move. I dO, winRect+4 (a5) 

SXCALL $A360 
move. I dO, task I D (a5) 

move. I d0, - (sp) 

move, w ¢-1, - (sp) 

move. I 1-1, - (sp) 

move, w #$20t16+WINOPT, -(sp) 

move, w i-1, - (sp) 

pea. I winTitl e (pc) 

pea. I winRect (a5) 

pea winPtr (a5) 

SXCALL $A1F9 
I ea. I 26 (sp) , sp 

tst. I dO 

bmi JNIT_Err 
st winAct i ve (a5) 


bsr DrawGraphl st 


moveq HO, dO 
rts 

moveq #-1, dO 
rts 


rts 


rts 


ネ ウィン ドウ 内部の 描画の 
* 準 漁を 十る サフ ルー チン 

* (なにもし ない） 

* ウィン ドウ 内部を 描画す る 
* サブルーチン 

* (なにもし ない） 


127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 JNITO: 

138 

140 _INIT1: 

141 

142 

143 JNIT2: 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 
161 

162 

163 

164 

165 INIT Err: 

166 

167 

168 

169 DrawGraphl st : 

170 

171 

172 

173 DrawGraph: 

174 

175 


w ルバ 1 を 
る ？ tt 卜 夕 く Er グ を 
得 ン eB ウ イク 成 開 し ラ 部 } 
を 夕 OS ド タレ 作を N1 フ 内 回 
DD CT ポ CI ン ウウに ウ II. フ ウ ー 
tl — —ズば イ ドド 上 en ド？ ばイ ドる の 
6e ク クーら ウ ンンク OP ン ーら テ ト ンす初 
TS ス ス ロな 準視 イイ I WM イラな クツ イ画最 
| タ タク 標可 ウウワ | ウエ アセ ウ 描'^ 


1 2 2 OL 2 2 OZ 2 
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176 

177 

178 TINI: 



* [ 終了 処理 1 

179 " 

pea 

winPtr (a5) 

* ウィン ドウを クローズ する 

180 

SXCALL 

SA1FB 

t WMC lose 

181 

addq. 1 

14, sp 

t 丽 Dispose でない ことに 注意 

182 




183 

moveq 

10. dO 


184 

rts 



185 

186 

187 winT i t 1 e : 

. even 


* [ 固定 デー タ ] 

t ウィンドウ タイトル 

188 

dc. b 

V NOTITLE. 

189 




190 

. end 




A>AS SKELTON 
A>AS BODY 

A>LK -0 SAMPLE SKELTON BODY 


のようにして SKELT 〇 N.S と BODY.S を それぞれ アセンブルし， リンクす る ことで， ウイ 
ン ドウを 表示す る だけの 基本的な プログラム ” SAMPLE.X” 力す 得られます。 この スケル ト 
ン は， 今後 何度も 使い 回す ことになるので すから， きちんと 動作す るか どうかを? 鶴 忍して おい 
てくだ さい。 ウィンドウの ドラッグ， アク テイ ペート， そして クローズ ボタンに よる タスクの 
終了が 正常に 行えれば， いちおう 正常に 動作して いると いえます。 

ところで， SX アプリケーションの プログラム = プログラム •モジュールには” R 型”，” C 
型”， ”〇 型” の 3 つの 種類が ありま した。 この スケルトンは R •型を 前提に つく られ てい ま 
す。 R 型の モジュールは コードを 複数の タスクで 共有す るた め， メモリ 効率が 非常によ いの 
が 特徴です* * 1 2 3 。 

*3 :R 型の モジュール 実行時の メモリの 使われ 方に ついては， 「 SX-WINDOW 〜 j の 192 ページ 以降を 參 
照して ください。 

そのために， プログラムは 次の 2 点を 守って 書く こ とが 要求され ます。 

1) 変数な どは 必ず ワーク エリアの 中に 置く 

2) コード 部， 固定 データ 部の 内容を 自分で 書き換えない 

1) に関しては， 仕様を まとめた 紙に 書き出した 変数を， 原則として ワーク エリアの 中に 置 
くように すれば よいで しよう 0 スケルトンでは， 最初の 初期 イ に ワーク エリアの 先頭 アド レ 
スを A5 に 収めて いるので， 以降 A5 を ポインタ として， ワーク エリアへ アクセス できます 0 
W 〇 RK.ING にはす でに 基本的な 変数が 定義して あります が， たとえば， この 中の 変数 
taskID の 内容を DO に 読み込みたい 場合は 
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2 コードの 組み立て 


move.l taskID ( a 5 )，dO 

と 書けば よいので す。 同様に， イベント レコード eventRec の アドレスを A 0 に セットした 
い 場合は， 

lea eventRec ( a 5 ),aO 

と します。 

£) に関しては， とくに 付け加える ことはありません。 コード 部， 固定 データ 部は プロ グラ 
ム エリアを 共有す るすべ ての タスクが^ 用す るので すから， かってに 書き換えれば， P 口 1 題が 発 
生す る ことは 明らかです* 4 。 

*4: 発生す る 問題を 逆手に とって， プログラム 部を 共有す る タスク すべてに ある 情報を 伝えたい 場合 
など， 静的な ワークを 利用して 伝える こと もで きます。 ただし， プログラム 部の 共有の しくみを 
よく 理解した う えで なければ 利用す る こと はおす すめで き ません。 


仕様から コードを 起こす 


スケルトンの 用意が できた ところで， 私たちの 時# f の 話に 戻り ましよう。 

前節では， 仕様を 決める にあたって 大きく 次の 3 つに 分けて 行いました。 これらは， それ 
ぞれ BODY . S の 中に 収められた ルーチンを 書き換える， または 追加す る こ とで 実現で きま 
す。 対応 関係は 次のと おりです。 


ウインドウ 内部の _ 

"►ウインドウ コン テン ツ への 描画 避理 ルーチン 

各イ ベント への 対応 

- ►各イ ベント の处理 ルーチン 

初期 イ ty 終了 処理 

-► 初期 ィ1^ 理/ 終了 处理 ルーチン 


スケルトンを 利用す る こ とに よって ウィンドウを 出す ところまでは できあがって います か 
ら， これらの ルーチンに 手を 加える 程度です むこ とは も うお わかりで すね。 

では， これらの ルーチンへの 手の 加え 方に ついて， 順に 解説して いくこと にします。 

❶ ウィンドウ コ ン テン ツ への 描画 処理 ルーチン 

BODY . S では， ウィンドウ コン テン ツ への 描画は 173 行 目から の サブ ルー チン， 
DrawGraph に ま とめて あり ます。 いまのところは ウィ ン ドウを 出す だけで 描画は 行って い 
な いので， 何もせ ずに リターンして いますが， ここ に 描画 用の コードを 書いて おけば, 画面を 描 
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く， あるいは 描き 直す 必要が 生じた ときに 呼び出される ことになります。 いまのところ ，アップ 
デ ー トイ ベント が 発生し た 際に 画面を 再 描画す るた め に 呼び出す ようになって いますが， 前節 
でも 述べた ように 画面を 描き 直さなければ ならない 場面は いくつ も 考えられます。 そのたび に 
DrawGraph を 呼び出せば 適切な 描画 力す 行える よ うにして おかなければ ならないで しよう。 

私たちの 時靖 t の 場合， その 時々 によって 必要な 場所 だけを 帮苗 画で き るよう にす るた め， 2 
つの ルーチンを 用意す る こ とに なって いま した 0 時刻表 示 用の ルーチンと， 時刻 以外の 描画 ルー 
チンの 2 つです 0 BODY.S の DrawGraph は アップデート イベントで 呼ばれて いる ことか 
らも わかる ように， ウィンドウ コンテンツ 内を 全面的に 描画す るた めの ルーチンで すが， これ 
を DrawTime と DrawOhter の £ つの ルーチンに 分け る ことにします 0 DrawGraph を 
呼び出し ている ところは， この 2 つを 順に 呼び出す ように 書き換える こ とに しまし よう。 


1) 時 亥 丨】 表示 用 ルーチン DrawTime 

ウィン ドウ コンテンツ 内への 描画を 始める とき に 忘れて はならない こ とに カレント グラフ 
ポートの 設定が あります。 これを 忘れる と， まったく 関係の ない 場所に 描画 力 5 ' 行われた りする 
ことになります から， 描画 ルーチンの 先 5頁 などで 設定して おく とよい とでし よう* 5 。 一般に， 
カレント グラフ ポート を 設定す る 際に 指定す る グラフ ポート レコードへの ポインタ としては， 
ウィンドウ レコードへの ポインタで 代用し ます。 これが 可能な 理由は， ウィンドウ レコー ドの 
構造を 考えて いただければ 自明で しよう。 

* 5 •• 少なくとも， タスク が 切り 替わる 可能性の ある sx コールを 利用した 後で 描画を 行う 前には， 必ず 
カレン ト グラフ ポー トを 設定して おく 必要が あります。 それ 以降は， 次に タスクが 切り替わ るか 
も しれない sx コールを 利用す るまでは 設定し 直す 必要はありません が， 何度も 設定を 行う 分には 
何の 問題 も あり ません。 

私たちの 時計の ウィ ン ドウの ウィ シド ウレ コー ドを， ワーク エリ ア 内の winPtr から 作成 
する ことにすると， 時 亥 用 ルーチンは 次の ような 始ま り 方を する こ とになります。 


DrawTime : 

pea winPtr ( a 5) 

SXCALL $ A 131 *GMSetGraph 

addq.l # 4 ,sp 


この ルーチンの 目的は 時刻を 文字列と して 表示す る ことです から， どうにかして 現在 時刻を 
得る 必要が あり ます。 前節の アイ ドル イベントの 項で 述べた ように， 現在 時刻は iocs を 呼 
び 出す こ とに よって 得られます。 
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moveq 

trap 


# $5640 
#15 


ホ TIMEGET 
* IOCS 呼び出し 


E コードの 組み立て 


これに よって 得られる 数値は 直接 文字列に 変換で きないので， も う 一度 IOCS を 利用して 
形式を 変換し ます。 

move.l dO.dl 

moveq # $57, dO * _TIMEBIN 

trap #15 * IOCS 呼び出し 


この結果， DO の 内容は， 上位 ワードの 時の 位， 下位 ワードの 上位 バイ トに 分の 位 ， 下位 バ 
イ トに 秒の 位が 入ります。 

今度は これを 文字列に 直さなければ なりません。 つねに M 時® j で 表示す る嚇 tlT あれば 話 
はかん たんな のです が, 私たちの 時計は 24 時 で 表示す るか 12 時制で 表示す るか， また， 12 
時制の 場合は 午前 か 午後 かで 表示す る 内容が 変わって きます。 こ の あたり の 条イ_ 断を 行って， 
テ'' ータ を 少し 加工す る ことにします。 


move.w 

#’ ，，d7 

*12 時制の 場合， 後で AM/PM の 文 
字 列を 入れる 

swap 

dO 

* 上位 ワ ー ドのと き の 位 を 下位に 

tst.w 

jiseil2(a5) 

* 12 時制 かどう かの フラグ 

beq 

DrawTimeS 

* 24 時制なら DrawTime 2 へ 

cmp.w 

# 12, dO 

* 12 時 以降？ 

bcc 

DrawTimeO 

* ならば 午後な ので DrawTimeO 

move.w 

# ’AM’.d? 

* 午前 

bra 

DrawTimel 


DrawTimeO: 

move.w 

#’PM ，， d7 


sub.w 

# 12, dO 

*12 時間 引く 

DrawTimel: 

tst.w 

dO 

*0 時？ 

bne 

DrawTime2 

* でなければ DrawTime 2 へ 

move.w 

# 12, dO 

* 12 時に 直す 

DrawTimeS: 

swap 

dO 

* 上位/下位 ワー ドを 元の 順に 戻す 


加工 済みの データを IOCS の $5 B を 使って 文字列に します。 時刻の 文字列を 作成す るバッ 
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ファには， ワーク エリアに 用意して おいた 時刻 文字列を 収める ための バッファ timeStr を 指 
定 します* 6 。 

*6: —時的に しか 使わない バッファで すから， スタック フレーム 上に link 命令 等で 確保した ほうが メ 
モリ 効率が 上がります （たかだか 数 バイトで すが)。 余力の ある 方は， そのよう に 改造して みて く 
ださい。 


move.l 

dO，dl 

*DI : 時刻 

lea 

timeStr(a5)，al 

*AI : 文字列が 返る バッファへの ポ 
インタ 

moveq 

# $5b ， d0 

氺一 TIMEASC 

trap 

#15 

* IOCS 呼び出し 


以上で 表示すべき 文字列は 得られました。 時刻の 表示を 行う 準備と して， 時刻を 表示す る 枠 
の 内部に 現在 表示され ている ものを， 背景 色で 塗り潰す ことによって 消して おきます。 塗り潰 
す 四角形を 表現す るレク タング ルレ コードは， 固定 データ timeRectlnside として 用意して 
おいた も のをす 旨定す る ことにします。 


move.w 

# $100, -(sp) 

* バック グラウン ド カラーで 描画 

SXCALL 

$A144 

* GMPenMode 

addq.l 

#2,sp 


pea 

timeRectlnside(pc) 

* 塗り潰すべき 四角形の 内側 

SXCALL 

$A173 

氺 GMPillRect 

addq.l 

#4,sp 



時刻を 描画す る 際の フォント について 設定して おき ましよう。 原則!： して， グラフ ポート 内 
の フォント や ペンの 設定な どは 一度 行って おけば'^ 化する こ とはない ので， 何度も 行う 必要は 
ない はずです。 しかし， ほかの 表示を 行う 際に 変更して いる 可能 注が あるのと， これから 行う 
描画の 内容を 明示す る 意味で， あえて 設定す る ことにします。 仕様に したがって， フ ォン トカ 
インド， フォント フェイス， フォント モード， フォ アグ ラウンド カラーの 設定を 行います* 7 。 
*7: バック グラウン ド カラーに ついては， ほかの ルー チンに よっても 変更され る こと はない と 判断し， 
設定を 行いません。 

また， 背景 色で 塗り潰した ときに 変更した ペン モードを 設定して いないのは， 文字列の 描画に ぺ 
ン モー ドは 影響し ないから です。 

move.w # £ f -(sp) 

SXCALL $A18B 

addq.l # 2,sp 

move.w # %0 001 l ， -(sp) 


* 24 x 24 
ホ GMFontKind 

* ィ タリ ック + ボールド 
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SXCALL 

$A18C 

*GMFontPace 

addq.l 

#2,sp 


move.w 

# O.-(sp) 

氺 pset 

SXCALL 

$A18D 

* GMFontMode 

addq.l 

#2,sp 


move.w 

# 11, -(sp) 

* 黒 

SXCALL 

$A147 

* GMForeColor 

addq.l 

#2,sp 



そして， 先 ほどつ くった 時刻 文字列を 描画し ます。 描画を 始める 位置は （24, 8) あたり, 
という こと になって いま した。 


move.l 

# $0018 一〇〇 08 ， -(sp) 

*(24, 8) 

SXCALL 

$A16E 

ホ GMMove 

addq.l 

#4,sp 


pea 

timeStr(a5) 

* 時刻 文字列の バッファ 

SXCALL 

$A192 

* GMDrawStrZ 

addq.l 

#4,sp 



さらに， フォントの 設定を 行った 後， ” AM ”， ” PM ”， または 空白 も 描画し ます。 D 7 に収 
めて ある 文字列 を 表示す るた めに， 多少 変！ 丨 J 的に スタック を 利用 してみ る ことにします。 


move.w 

# Or(sp) 

* 12X12 

SXCALL 

$A18B 

* GMFontKind 

addq.l 

#2,sp 


move.w 

# 700000 l,-(sp) 

* ボ ー ルド 

SXCALL 

$A18C 

* GMFontFace 

addq.l 

#2,sp 


move.l 

# $0088_0014,-(sp) 

*(136, 20) 

SXCALL 

$A16E 

* GMMove 

addq.l 

#4,sp 


swap 

d7 


clr.w 

d7 

* これで D7 は ’ AM’ ， 0, 0 という 形 
式になる 

move.l 

d7,-(sp) 

* スタック フレーム 上に ASCIIZ 文 
字 列と して 置く 

pea 

(SP) 

* スタック フ レーム 上の 文字列を 指す 
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SXCAL1 $A192 * GMDrawStrZ 

addq.l # 8，sp 

以上で 時刻の 表示は 完了です。 最後に サブルーチンからの リターンを 行い， この サブ ルー チ 
ンは 終了と いう ことになります 0 


rts 


* of DrawTime 


2) 時刻 以外の 描画 ルーチン DrawOther 

Z つの 画面 描画 用の サブルーチン のもう 一方は， 時刻 以外の 描画を 行う ルーチンです。 時刻 
以外と いっても、 i 莫^と している ので， 最初に 整理して おく ことにし ましよう。 

• 時刻表 示を 囲む 枠の 描画 
•コント ロ ー ルの 描画 
•コント ロ ー ルの タイト ルの 描画 

の 3 つが， この ルーチンの おもな 仕事です。 順に コードを 書いて いきまし よう。 

まず， なによりも 先に カレント グラフ ポートの 設定を 行います。 実際には， ここでは 設定を 
省略す る ことができます。 すでに DrawTime で 設定して いますし， この ルーチンが 呼ばれ 
ると きには， 必ず その 前に DrawTime が砰 ばれて いるから です。 しかし， 何度 設定を 行っ 
て も 悪い こ とはありません し， ネ苗画 開始 時には 必ず カレン ト グラフ ポートを 設定 するとい う 習 
慣を つける ために も， きちんと 設定して おく ことにします。 


DrawOther : 



pea 

winPtr(a5) 


SXCALL 

$A131 

氺 GMSetGraph 

addq.l 

#4,sp 



まずは 最初の 仕事， 時刻表 示を 囲む 枠の 描画を 行います。 描画す る 枠を 表現す るレク タング 
ル レコ _ ドは， 固定 データ timeRectOutside を 指定す る ことにします 0 DrawTime の 中 
で 使用した timeRectlnside という レク タング ル レコー ドを 流用で きそう な 気 もし ますが， 
そうすると 背景 色での 塗り潰し を 行った ときに 枠まで 塗り潰されて しまう ので， わずかな 違い 
では あり ますが， 別々 のレク タング ノレ レコード としま した。 

こ の 枠は 影 付き の 枠な ので， $A1A£ GMShadowRect で 描画 します。 こ の コールでは ぺ 
ン 関係の 設定は 参照され ず， つねに 一定の 形式で 描画され るので， ペン モードな どの 設定を 省 
w 各で きます。 
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pea timeRectOntside(pc) 

SXCALL $A1AZ 氺 GMShadowRect 

addq.l # 4,sp 

次の コン ト ロールの 描画です が， これは かんたんで， 描画したい コントロール (複数) の乗っ 
た ウインドウの ウインドウ レコードを 指定して $A28E CMDraw を 呼び出せば， その ウイ 
ン ドウ 上の コント ロールが すべて 描画され ます。 

pea winPtr(a5) 

SXCALL $A28E 氺 CMDraw 

addq.l # 4，sp 

3 つめは コントロールの タイ ト ル 類の 表示です 0 これらは ひたすら 文字列を 描き 始める 座標 
を 指定して， タイ トル 文字列を 描画 （$A1A1 GMShadowStrZ) する だけな ので， 例!： し 
て 示す のは， 時報を 設定す る チェック ボックスの タイ トル 1 つ だ' けにして おきます。 


move.w 

# 0，_(sp) 

氺 12X12 

SXCALL 

$A18B 

氺 GMFontKind 

addq.l 

#2,sp 


move.w 

# 700000 0,-(sp) 

* 装飾な し 

SXCALL 

$A18 〇 

ホ GMFontFace 

addq.l 

#2,sp 


move.l 

# $0054_0040,-(sp) 

* (84， 64) 

pea 

chkBoxTitle(pc) 

* チェック ボックスの タイ ト ル 文字 
列 （ASCIIZ) 

SXCALL 

$A1A1 

* GMShadowStrZ 

addq.l 

#8,sp 



同様にして， すべての タイトルを 描画し 終わったら， DrawOther の 仕事は すべて 終了で 
す 0 


rts * of DrawOther 

❷各イ ベン トの 処理 ルーチン 

私たち の 時計で サ ポー トする イベントは， 次の 5 種類 6 イベントで， そ れぞれ の イベント 
と イベント 避理 ルーチンとの 対応は， 次のと おりです。 
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アイ ドル イベント 

-fIDLE 

レフ ト ダウン イベント 

-fMSLDOWN 
ァップデート イベント 
- ►UPDATE 
アク テイべ ー トイ ベント 
— ACTIVATE 

システム イ ベン ト 1， 2 

- ►SYSTEMl 
SYSTEM 2 


BODY . S の はじめの ほうでは， サポート しない イベントの 54 理 ルーチンの ラベルを まとめ 
て 書いて おき， 何もせ ずに リターン させて いる 箇所が あ ります。 ここに は 私たち の 時計の サボー 
卜する アイ ドル イベントの 处理 ルー チン IDLE が 含まれて いるので， 251子 目の 

IDLE : * [アイ ドル イベント] 

を 削除して， SiJ の 場所に アイ ドル イベント 处理 ルーチンを 書く ことになります。 

BODY . S の 中に 含まれる イ ベン ト 処理 ルーチンは， SKELT 〇 N . S の 中の イ ベン ト 待ち 
ループから サブルーチン として 呼び出されます。 各 イベント 理ルー チンの 中で 何 か 異常 （あ 
るいは 仕様で 決めて おいた 事態） が 発生して， タスクを 終了し なければ なら なくなった 場合， 
DO に 負の 数を， 正常に 終了した 場合は DO に 0 を 入れて リターン する 約束に なって います。 
それでは， 順に 各 イベント 处理 ルーチンの 作成， 書き換え について 考えて みまし よう。 


1) アイ ド ルイ ベン ト处理 ルーチン IDLE 

この ルー チンは いままで 用意され ていませんでした。 MSLDOW の 前 あたりに 置く ことに 
します。 

前節で 定めた 仕事の 内容を 順に コードに 直して いく ことにし ましよう。 

最初の 仕事は， 「イベント レコードから イベントの 発生した 時刻を 得る」 でした。 イベント 
の 発生した システム 時亥丨 j は イベント レコードの 6 バイ ト 目， スケルトンの 定義では ワーク エ 
リ ア 内の eventRec when から ロ ン グワー ドで 収め られ ています 0 


IDLE : 

move.l eventRec when ( a 5 ),dl *ィ ベン ト 発生 時刻を DI に 
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次は， 「前回 時 亥 丨臟 を 書き換えた ときに 保存して おいた 嚇 ij と 上 b $ 交して， 1 秒 過し 
ている かどう かを 調べる」 です。 これは ただの 計算な ので 説明の 必要は ない と 思います。 前回 
時刻を 書き換えた システム 時刻は ワーク エリア 内の lastTimeUpdate に 収められ ている こ 
と になって いますから， コードは 次の よ うになります。 


move.l 

dl，dO 

sub.l 

lastTimeUpdate ( a 5 ),dO 

cmp.l 

# 100 , dO 

bcs 

IDLE 9 


* 前回の 書き換え システム 時刻からの 
* 経過 時間を 求める 

* I 秒 以上 経過？ 

* でなければ IDLE 9 へ 


IDLE 9 は アイ ドル イベント 处理 ルーチンの 終端で あり， イ ベン ト 待ち ループへ 戻る RTS 
命令が 書いて あ ります。 

1 秒 以上 経過して いると 判断で きた 場合は， 前の 時刻を 塗り潰し， 現在 時刻を 描画し ます。 
このための ルーチンは， すでに DrawTime としてつ くって あるので， これを 呼び出す だけ 
です みます。 DrawTime を 呼び出す 前に， 本来は 次の ステップと していました が， 時刻を 描 
画し 直した 時刻を 変数に 保: 存 して ぉく ことにし ましょう。 これは， D 1 に 保存して ぉいた イべ 
ン ト 発生 システム 時刻が DrawTime 内で 破壊され る 可能性が あるた めです。 


move.l dl , lastTimeUpdate ( a 5) * イ ベン ト 発生 時刻を 保存 

bsr DrawTime 

時刻が 描画で きたら， 次は 時報の 処理です。 

最初に 時報を 鳴らす か 鳴らさな いかを 調べます。 時報を 鳴らす/鳴らさな いの 設定は， ワー 
ク エリ ア 内の jihou という 変数に 収め られ ています。 


tst.w 

jihou ( a 5) 

* 時報を 鳴らす？ 

beq 

IDLE 9 

* 鳴らさないなら IDLE 9 へ 

時報は 每正 時， つまり， 00 分 00 秒に 鳴らす わけです から， 時刻を 意味す る 数値の 下位 ワ 

ドを 調べれば すぐに わかり ます。 

moveq 

#$56, d 0 

*_TIMEGET 

trap 

#15 

* IOCS 呼び出し 

tst.w 

dO 

* 00 分 00 秒？ 

bne 

IDLE 9 

* でなければ IDLE 9 へ 
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正 時であった こ とが 嘯 

認 できた!： ころで， _ の 音を 出します。 ここでは 簡易な 方法を 選び, 

ビープ 音を 鳴らす だけと 

します。 


move.w 

# 2,-( sp ) 

* 丨 回 

SXCALL 

$ A 2 D 7 

*__DMBeep 

addq.l 

#2 ,sp 



余力の ある 方は， 自前の ADPCM データを 鳴らしたり， 予告 音を 鳴らす ようにす るな ど 
改造して みる ものよ いでし よう。 

以上で， アイドル イベントで 行う 仕事は 完了し ました。 正常終了を 意味す る 〇 を DO に収 
めて， RTS 命^ t ： 'イベント 待ちに 戻ります。 ここに ラベル IDLE 9 を 設定す る ことを 忘れ 
てはいけ ません。 

IDLE9: 

moveq # 0,d0 

rts * of IDLE 


2) レフト ダウン イベント 处理 ルーチン MSLDOWN 
手を 加えて いない 状態の スケルトンは， レフ ト ダ' ウン イ ベン ト 発生 時には ごく 基本的な 仕事 
をして くれます。 まず， 自分の ウィンドウ 上で マウスの 左 ボタンが 押された のか どうかを 判断 
し， ウィンドウ 上で あれば， ウィンドウを 利用す る アプリケーション すべて 力 5 ' 守らなければ な 
ら ない ガイ ドラ インに そった 仕事を 行います （前節 参照)。 

スケルトンは 力'' イ ドラ インに 示された イ士 事を， さまざまな 条件を 判断して 行うよう につ くら 
れ ています 力す， その ほとんどは BODY . S の 51 行， 

SXCALL $A3A2 * __ SXCallWindM 

この 1 行に 集約され ています。 ただし， 私たちの 時計の 場合は， その 恩恵に あずかる のは ウィ 
ン ドウの ド ラック 胃です が。 

SXCallWindM から 戻って きたと き， DO には マウスの 左 ボタンに よって 「押された」 ウィ 
ン ドウの パー トコー ドが 入って います。 この パー トコー ドは， すでに 理 された」 パートを 
意味して いる ことに 注意して ください。 たとえば， パート コードと して 7 が 返って きたと き， 
それは クローズ ボタン 上で 左 ボタン カ ? 押され， そして， やはり クローズ ボタン 上で 左 ボタンが 
離された， という ことを 意味して います* 8 〇 スケルトンは， 返り 値の パー ト コードを 調べて 
クロー ズ ボタンであった 場合は， 終了すべき である ことを 示す 負の 数 （_1) を DO に 入れて， 
イ ベン ト 待ち ループへ と 戻って います 0 
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*8: SXCaMWindM 同様に， マウス ポインタの 座標を 渡す と， ウィンドウの パート コードを 返す SX コー 
ルに WMRnd があります が， WMFind は， ただ その 座標が ウィンドウ 上の どこに 位置す るかを 調べ 
る だけで， 本文 中で 例に 挙げたよ うに クローズ ポタン 上で 押され， 離された かどう かな どを 調べ 
たりす る ことは あり ません。 

SXCallWindM と WMnnd の 返す パー ト コー ドの 違いに ついては， 「 SX-WINDOW 〜 j 178 ページの コ 
ラム も 参照して く ださい。 


このように， 0 S と 関係して いる ウインドウの 枠な どに 関する 姓理 は スケルトンが 行って く 
れ るので， 私たちは アプリ ケー シ ヨンの 領分で あると ころの ウインドウ コンテンツ 内部の 欠!; 理 
だけを 考えれば よいので す。 したがって， スケルトンに 手を 加える ところは， スケルトンが 必 
要な パート コードを 調べ 終わった ところ， つまり BODY . S の 56 行， 


cmp.w # 7, d 0 * クローズ ボタン？ 

beq CloseBttn * ならば CloseBttn へ 

の 直後から という こ とに なり ます。 

まずは マウスの 左 ボタン カす 押された のが， ウイン ドウ コンテンツの 内部で あるか どうかを 確 
かめなければ なりません。 ウインドウ コンテンツの パー トコー ドは 3 ですから， それ 以外 だ っ 
た 場合は イベント ループに 戻る よ うにし ます。 

cmp.w #3, d 0 * ウインドウ コンテンツ？ 

bne MSLD 9 * でなければ MSLD 9 へ 


私たちの 時計には， ウインドウ コンテンツ 内に 置かれ， マウスで 操作で きる ものと しては 
チェック ボックスが 1 つと ラジオ ボタンが 2 つ ありました。 これらは， いずれも コント ロー 
ルです。 ウインドウ コンテンツに 置かれた コントロールに ついての 処理を 行う には， $ A 3 A 3 
SXCallCtrlM という 便利な SX コールが 使えます。 

SXCallCtrlM は， マウス ポイ ンタの 座標を 調べて， ウインドウ コンテンツ 上の コント ロー 
ルのう ちの いずれ かの 上で 左 ボタンが 押されて いる* 9 ときには， 次の ような 处 理を 行って く 
れ ます。 

*9: いずれも， SXCallWindM の クローズ ボタンの 例の ように， 「押されて， 離される」 までを 確認した 
後に 処理を 行います。 


• ラジオ ボタン/チェック ボックスの on/off 

• ス クロ ー ルノ ^ 一 による ス クロ ー ル 

• そのほかの コント ロー ルの 操イ隹 


そして， 処理を 行った コントロールへの ハンドルを A 0 に， 押されて いた コントロールの 
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パート コードを DO に 返します 0 

この コールを 呼ぶ こ とに よって， かなりの 処理を SX - SYSTEM が 肩代わり してく れ るの 
で， 書くべき コードは 激減す る ことが おわかり いただけ ると 思います。 結局， 私たちの 書かな 
くて はならない コードは， 

• チェック ボックスが 押されたなら 
押された 結果 （ on / off 状態） を 変数に IE # する 
• ラジオ ボタンの どちら か 片方が 押されたなら， 押された ボタンを on ， も う 片方を off に 
して， どちらが 押された のかを 変数に 記録す る* 10 。 そして， 設定を 変更した 状態の 時刻 
を 画する 

* IO : SXCallCtrlM は， 押された ラジオ ポタンの on / off を 反転して しまう ので， 結局， 自分で on / off を 
正しく 設定し なくて はなり ません。 

これ だけになります。 どの ボタン も 押されなかった 場合， DO には 0 が 返る ので， この 場 
合は 何もせ ずに イ ベン ト 侍ち ループに 戻る こと も 忘れて はいけ ません。 

それでは， 実際に コードを 書いて みまし ょう。 

まずは， SXGall 〇 trlM を 呼び出します 0 ウインドウに ス クロー ルバ ーが ついている 場合 
は， それへの ハンドルを 指* 定 しなければ ならない のです 力 5 '， 私たちの 時# 十の ウインドウには ス 
クロー ルバ— がつ いていない ので， 省略を 意味す る” 〇” を 指定し ます 0 


clr.l 

-( sp ) 

氺 dRectPtr (省略) 

clr.l 

-( sp ) 

*ctrlHdlH (省略） 

clr.l 

~(sp) 

*ctrlHdlV (省略） 

pea 

eventRec ( a 5) 

* イベント レコ ー ドへの ポインタ 

pea 

㈣ 

木 ウィンド ウレ コー ドへの ポインタ 

SX 〇 ALL 

$ A 3 A 3 

* __ SXCallCtrIM 

lea 

£0( sp),sp 


押さ れた 場所が どの コント ロ ー ル 上で もなかつ た 場合， 

イ ベン ト 待ちに 戻り ます。 

tst.l 

dO 

* コント ロー ル 上？ 

beq 

MSLD 9 

* でなければ MSLD 9 へ 


続いて， 押された コントロールの を 調べ， それにしたがって 書く コントロール 用の 奶理 
へ 分^ します。 
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cmp.l 

chkBoxHdl(a5),aO 

beq 

MSLD 一 ChkBox 

cmp.l 

radlHdl(a5),aO 

beq 

MSLD_Radl 

cmp.l 

rad£Hdl(a5),aO 

beq 

MSLD_Rad2 


* チェック ポッ クスが 操作 さ れ た？ 

* ならば MSLD ChkBox へ 

* ラジオ ポタン 丨 が 操作され た？ 

* ならば MSLD Rad 丨 へ 

* ラジオ ボタン 2 が 操作され た？ 

* ならば MSLD Rad2 へ 


これら 0 夕 f という ことは ありえな いのです が， その 場合は 何も しない こ とに して おきます。 
このような， 「まず 起こらない」 エラー 対策 も， 手を抜かずに できるだけ 用意して おきたい も 
のです。 


bra MSLD9 * これら 以外の 場合は MSLD9 へ 

チェック ボックスの 姓理 は， MSLD_ChkBox から 始まります。 ここでの 理 は， チェ ッ 
ク ボックスの 新たな 値を 調べて， それを 変数に 格納す る ことです。 チェック ボックスの 値は 原 
則と して 0 (off) か 1 (on) と 決まって いるので， on か off かは 返り 値を， ワードで tst 
すれば 判断で きます。 したがって， この 値を 変数： jihoui に 代入して おけば， アイド ルイ ベン 
卜处理 ルーチンの 中で _ を 鳴らす か 鳴らさな いかの 判断を 行う こ と 力す できます。 


MSLD_ChkBox : 

move.l 

chkBoxHdl(a5),-(sp) 

* チェック ボック ス への ハンドル 

SXCALL 

$A291 

*_ 一 CMValueGet 

addq.l 

#4,sp 


move.w 

d0,jihou(a5) 


bra 

MSLD9 

氺 MSLD9 へ 


ラジオ ボタ ンは 1 が on になつ た 場合は 1£ 時制， 2 が on になつ た 場合は £4 時制です か 
ら， フラグ jiseil2 を セット， あるいは リセットして， 押された ボタンを on, もう 片方の ラ 
ジオ ボタンを off にす る处理 を 行います。 


MSLD—Radl: 

moveq # l，dl 

moveq # 0,dZ 

bra MSLDRad 

MSLD_Rad2 : 

moveq # 0，dl 


* ラジオ ポタン 丨 を on に 
* ラジオ ボタン 2 を off に 


* ラジオ ボタン I を off に 
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moveq 

#l,d£ 

* ラジオ ポタン 2 を on に 

move.w 

dl,jiseil£(a5) 

*jiseil2 に 値を 設定 

move.w 

dl.-(sp) 


move.l 

radlHdl(a5),-(sp) 

* ラジオ ポタン 1 に 値を 設定 

SXCALL 

$A£90 

木 CMValueSet 

addq.l 

# 6,sp 


move.w 

d£,-(sp) 


move.l 

rad2Hdl(a5),-(sp) 

* ラジオ ポタン 2 に 値を 設定 

SXCALL 

$A£90 

氺 CMValueSet 

addq.l 

# 6,sp 


bsr 

DrawTime 

* 切り替えられた 時制で 時刻を 再 描画 

bra 

MSLD9 



レフト ダ' ウン イ ベント の 理は 以上です 0 


3) アツ プデー ト ベント 处理 ルーチン UPDATE 
BODY . S のア ツプデ ー ト处理 ルーチンに 書かれて いる コー ド だけで も， 私たちの 時計に 必 
要な 姓理の 3 分の 2 がすんで います。 したがって， 手を 加えなければ ならない のは， 画面 全 
体を 書き直す 描画 ルーチンの 呼び出し だけと いう こ とになります。 

BODY . S で 呼び出し ている 描画 ルーチンは DrawGraph となって います 力 5 ', 私たちの 時 
計では， これを 2 つに 分割し， DrawTime と DrawOther に 分けました。 したがって， 
UPDATE 全体は 次の よう に 書き換えます。 


UPDATE : * [ アップデート イベント」 


pea 

winPtr(a5) 


SXCALL 

$A20D 

氺 WMUpdate 

addq.l 

#4,sp 

* ァッ プ デー ト 開始 

bsr 

DrawTime 


bsr 

DrawOther 


pea 

winPtr(a5) 


SXCALL 

$A£0E 

* _WMUpdtOver 

addq.l 

#4，sp 

* ァッ プ デート 終了 

moveq 

rts 

#0,d0 
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4) アク テイべ一 ト イベント 姓理 ルーチン ACTIVATE 

アク テイべ 一 卜 が 発生し た 場合の 奶理 は， BODY . S そのまま で 問題 あ りません。 このまま 
で 手を 加える 必要は あり ません。 


5) システム イベント： U S 处理 ルーチン SYSTEMS SYSTEMS 

スケルトンには， すべての アプリケーションが サポートし なければ ならない， タスク マネー 
ジヤ イベント コード 1 の 「タスクの 終了」， 2 の 「ウインドウの クローズ、」， 32 の 「ウィンド 
ウの セレクト」 の 3 つに ついての 処理が 用意され ています。 私たちの 時計には， さらに これ 
ら に加えて， タスク マネージ ャイ ベント コード 31» 「現在の 状態を セーブ」 についての 处理 
が 必要です 。 

アプリケーションの 状態の 保存を 行う 方法と しては， 状態を 数値 化して ファイル などに 

して おく ことが 考えられます。 しかし， 私たちの 時計の 場合， 保存すべき 状態と いっても， 「12 

時 M か 24 時制 か」 と 「時報を 鳴らす か 鳴らさな いか」 の 2 つくらい しかありません。 この 

ような わずかな 情報を 収めた ファイルを 作成す るのは デイ スタの 効率 もよ くありません し， 

ディスク 上に ファイルが どんどん 増えて しまう の も 考え ものです。 さらに， いくつ も 起動で き 

る アプリ ケー ショ ンの 場合は， ファイル 名 を 工夫す るな ど の 必要 も あるで しよう* 11 。 

* II : 状態を ファイルに 記録す る ァプリケーション として， SXI . I の エディタ . X があります。 エディタ. 
X も， いくつ も 同時に 起動す る ことができ ますが， ファイルから 最初に 起動され た エディタ . 父が 
「親」 となり， その コードを 共有して いる 「子」 たちの 情報 もまと めて ファイル として 管理して 
いるよう です。 

そこで， ” サウンド . X ” や ” キャン バ、 ス. X ” などで も 使われて いる 方' 法を 使う こ とに します。 

アプリ ケー ショ ンがタ スタと し て 起動 さ れる 際には コマンド ライ ン 文字列が 渡され ま すが， 
シェルを 終了す ると きに 動作して いた タスクに 関しては， その タスクの 起動時に 渡された コマ 
ンド ライン 文字列が タスク 名と ともに SYSDTOP . SX に 記録され ます （144 ページの コラ 
ム 参照)。 そして， 次に シェルが 起動され たと き， SYSDTOP . SX に 記録され ていた タスク 
が 再起動され， そのと きに コマンド ライン 文字列 も I 觸 されて いた ものが 渡されます。 この 機 
能を うまく 利用す る ことによって， 状態の f 呆存を 行う こと がで きます。 

先 ほど も 挙げたよ うに， 私たちの 時計の 保存すべき 状態は， 「12 時 M か 24 時 M か」 と 「時 
報を 鳴らす か 鳴らさな いか」 の 2 つです。 コマンド ライン 上で 次の ような オプションを 指定 
する こと によって， これらの 初期設定を 決定す るよう に 決めて おき ます。 


-to 

24 時制 

-tl 

12 時制 

-jO 

時報を 鳴らさない 

-jl 

時報を 鳴らす 


初期化 ルーチンで コマンド ラインを 解析 1 すると きに， これらの オプションを 判断す るよう に 
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して おけば よいで しよう。 

これで 状態の 保存の 半分， 状態の 復帰が 実現で きました。 時計を 終了しても， 人間が 設定を 
覚えて おいて， 次に 起動 するとき に オプションを つけて 起動 すれば， 前の 状態が 再現で きま 
す* 12 。 しかし， いちいち 人間が これらの 仕事を 行う のは ばかげ ています。 コンピュータ にや 
ら せて しまい ま しよう。 

* 12: コマンド ラインを 編集す るた めには， [ OPT . I ] を 押しながら 実行 ファイルの アイコンを ダ ブルク 
リックし ます。 

すでに 述べた ように， シェルの 終了 時に 各 タスクの コマン ドラ イン 文字列は SYSDTOP . 
SX に 保存され ます。 という ことは， ここに 前の 状態を 意味す る オプションを 書いた コマンド 
ライン 文字列が 保存され ていれば， 次に 起動され る ときには 前と 同じ 状態で 起動す る ことにな 
りは しないで しよう か？ 

たとえば， 私たちの 時計で あれば， 12 時® J で 時刻を 表示し， かつ 時報を 鳴らす 状態で あつ 
す こ 場合， SYSDT 〇 P . SX に 言 录 されるべき コマンド ラインを’- tl - jl ’ として おきます。 次 
に 起動され ると きには， 時計には， この’- tl - jl ’ が 渡されます。 この結果， 時計は 1£ 時 M 
の 時報 あり に 設定され， 見事に 前の 状態が 復元され たこ とになります。 

それでは， これを 実現す る コードを 書いて みます。 スケルトンに 追加す る 位置は BODY.S 
の 101 行 目, 

cmp.w # $2040 * ウィン ドウの セ レクト？ 

beq WindowSelect * ならば WindowSelect へ 

の 直後と なります。 

まずは， タスク マネージャイ ベン トコードが 3ム 「状態の 保存」 であるか どうかを 調べる 
こ とから 始まり ます。 

cmp.w # 31,d0 * 状態の 保存？ 

beq Save * ならば Save へ 


BODY . S の 117 行 目， WindowSelect の rts の 直後に Save という ラベルを 設定し， 
ここ か ら 状態の 保存 处理 を 書き 始め る ことにします。 

コマンド ラインを 書き換え るには， 各 タスクに ついて タスク 名 や コマンド ライン 等の 情報を 
保存して いる タスク 管理 テー ブルを 利用し ます。 あらかじめ 注意して おきます 力す， ここには 重 
要な 情報 も 言 £1录 さ れ ている ので， 必要 以」 1 に 手を 加 えては いけ ま せん。 

まずは， スタック 上に 領域を 確保して から， 自分の タスク 管理 テーブルを 読み込む ことにし 
ます。 
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Save : 


link 

a 4,# - 51 Z 

*512 バイ トの 領域を 確保 

move.w 

# - l .-( sp ) 

* 自分の タスク 管理 テーブルを 取得 

pea 

-512( a 4) 

* スタ ック 上の 領域に 読み込む 

SXCALL 

$ A 35 B 

TSGetTdb 

addq.l 

# 6 ,sp 



これで， A 4 を 終端と する スタック 上の 領域に， 時計 自身の タスク 管理 テーブルが コピー さ 
れま した。 

タスク 管理 テーブル 中の コマンド ライン 文字列は， オフ セッ ト $5 A から LASGII 型で 記 
録 されて います* 13 。 ここに オプションを 書き込みます。 前回 何が 書かれて いたかは， とくに 
意識す る 必要はありません。 コマンド ライン 文字列の 先頭を A 0 に 収めて， オプションの 書 
き 込みに 備えます。 また， オプションの 書き込みは ロング ワードで 行う と 便利な ので， 文字列 
の 先頭に スペースを 入れて， 偶数 ア ドレスから 書き込みが 始められる ように 補正して おきます。 

* I 3:「 SX - WIND 0 W 〜 j 初版 第 I 刷， 第 2 刷では ASCIIZ 型と 記されて いました が， 正しくは LASCII 型で 
す 0 


lea 

-512 + $5 a ( a 4), a 0 

* A 0 : 文字列 先頭 （文字 数) 

lea 

S ( aO),al 

*AI : 文字列 実体 先頭 

move.b 

#’ M ( aO ) 

* スペースで ア ドレス 補正 

の 設定を 記録し ます。 



move.l 

# ，- tl ，， d 0 

氺 ， -tr 

tst.w 

jiseil 2( a 5) 

* 12 時制？ 

bne 

SaveO 

* ならば SaveO へ 

move.w 

#，0 ，， d 0 

* ，- to . 

SaveO : 



move.l 

dO ,( al ) + 



時報の 設定を 言 ei 录 します。 


move.l 

#，- jl ，. shl .8, d 0 


tst.w 

jihou ( a 5) 

* 時報を 鳴らす？ 

bne 

Savel 

* ならば Savel 
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move.w # ’0’.shl.8，d0 * ’-jO’， 0 

Savel : 

move.l dO,(al) 


LASQII 文字列な ので， 文字 数を セットし ます。 この場合， 文字 数は 7 文字と 決まって い 
るので， 文字列 先頭に 7+1 (補正した スペースの 分） を 入れます。 


move.b #7 + l，(aO) 

コマンド ライ ン 文字列の 設定は 完了し たので， 次は 文字列 を 設定 し 終わ つた タス ク 管理 テ ー 
ブルの コピーを， SX-SYSTEM 内の 原本に 上書き します 0 

* 自分の タスク 管理 テーブルに 書き 
込む 

氺 スタ ツ ク 上の コ ピーから 
氺 TSSetTdb 


スタック 上に 確保した 領域を 開放して， 終了し ます 0 

1111 lk a4 * スタック 上の 領域を 開放 

moveq # 0,d0 

rts 


move.w # -l,-(sp) 

pea -512(a4) 

SXCALL $A35C 
addq.l # 6,sp 


このよう にして 変更され た SX-SYSTEM 内の タスク 管理 テーブルは， この イベントの 後， 
SYSDTOP.SX に， その 内容の 一部 （つまり， タスク 名， コマンド ライン 文字列 等） 力 ? 記 
録 されます。 

以 Ji の 処理と， 初期 ィ1^理 が ペアと なって， 状態の 保存が 実現で きます。 


❸ 初期化 処理 ルーチン 

初期化 ルーチン INIT は， SKELTON.S の 中で 非常に 下位の レベルの 初期化を 行って， 
SX アプリケーション とし て 動作す る 下地を 整え た 後で 呼び出さ れ ます。 

前節で 挙げた 初期化 ルー チンの 仕事は， 


64 


2 コードの 組み立て 


1) ワーク エリアの 初期化 
Z ) ウインドウの オープン 

3) コントロールの オープン 

4) 初期 画面の 描画 

の 4 つで し たが， 状態の 保存に よって コマンド ライ ンの 解析が 必要 とな っ たので, 

5) オプションの 解析 


が 追加され ます。 

このうち， 2) の ウインドウの オープンに ついては， ハ。 ラ メータの 変更 程度で 実 J 見で きます。 
1) ワーク エリアの 初期化 

いくつかの 変数に ついては， すでに 初期化の 处理が 書き込まれて いますが， 私たちの 時計 固 
有の 変数の 初期化を 追加す る 必要が あります。 初期化の 必要な 固有の 変数には どのような もの 
が あるで しよ うか。 


• 前回の 時刻 書き換え システム 時刻 lastTimeUpdate 
初期 イ 理 実行時の システム 時刻を 調べて 代入して もよ いのです が， どのみ ち 最初に 1 
回は 書き換えて もらわなければ いけない ので， はるか 以前の システム 時刻， つまり 0 を 
代入して おきます。 こうす る ことで， 次の アイドル イベントでは 必ず 書き換えが 起こり ま 
す 。 

このほかの 変数に ついては， ウインドウ や コントロールの オープン， オプションの 解析な 

どの 箇所て' 初期 イ 匕され ます 0 

この 初期化の 处理は BQDY.S の 159 行 目 


st winAvtive(a5) 

の 直後に 置く ことにします。 


* アクティブ フラグを セット 


clr.l lastTimeUpdate(a5) * 前回の 書き換え 時刻を クリア 


2) ウィ ン ドウの オープン 

前述の ように， ウィンドウの オープン に関して 行わなければ ならない のは， ハ。 ラメー タの変 
更 程度です。 BODY.S では， 変更し やすいよ うに， ウィンドウの 大きさ と ウィンドウ オ プショ 
ン について は シンボル 化 ^ して， ソースの 始めの ほうに 置いて あり ます。 
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私たちの 時計の ウィンドウの 大きさは （160, 80)。 ウィンドウ オプションは， サイズ ボタ 
ンや スクロール ボックス など， 付属品は いっさい 必要ない ので， 70000 0 という ことにな り ま 
す。 したがって， BODY . S の £0 行 目からは 次のように 書き換えます。 


WIN0PT = 700000 

WIN X = 160 

WIN Y 80 


* ウインドウ オプション 
* ウイン ドウ 初期 x 
* ウィン ドウ 初期 y 


このほかに， ウインドウ タイトル も 決めなければ いけません。 スケルトンでは ， winTitle 
という ラベルから 始まる LASCII 型の 文字列が ウインドウ タイ トルと なり ます。 私たちの 
時計の ウイ ン ドウ タイ トルは シン プノ レに ’ Clock ’ とする こ とに します 0 


winTitle : 

dc.b 5 ，， Glock ， 


* ウインドウ タイ ト ル 


3) オプションの 角 科 斤 

システム イベント の处理 のと こ ろで 述べた ように， 状態の 保存は システム イベント での 状態 
の セーブと， 初期化 延理 での 状態の 復帰が ペアに なって 実現され ます。 スケルトンでは’- W ’ 
オプションの 解析を 行って いますが ， SX コールを 利用して いるので， この 欠 t 理に 相乗り する 
ことは できません。 別の 場所に コマンド ラインの 解析 to 理を 書く ことが 必要です。 ここでは 
BODY.S CD 144 行 目， 

SXCALL $A360 *_ TSGetID 

move.l dO,taskID(a5) * タスク ID を 得る 


の 直前で 解 + 斤を 行う ことにします。 

コマンド ラインの ア ドレスは 変数 cmdLine に 収められて いるので， これを A 0 に 読み込 
んで ，解析し やすいよ うに ASCIIZ 文字列に 変換して から オプション 文字の’一’ を 探します。 


INIT3 : 


moveq 

#041 

moveq 

#042 

move.l 

cmdLine(a5),a0 

moveq 

#0,d0 

move.b 

(aO) + ,dO 

sf 

(aO.dO.w) 

move.b 

(aO) +，dO 


* jiseil2 に 入る 値 

* jihou に 入る 値 

木 コマン ドラ インの ア ドレス 


* 文 字数 

* 文字列 末尾に $00 を 付加 
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* 丨 文字 読み込み 


2 コードの 組み立て 


beq 

INIT4 

* $00 なら 解析 終了 

cmp.b 

# ，-，，dO 

* オプ シヨ ン 文字？ 

bne 

INIT3 

* でなければ _INIT3 へ 

オプション 文字が 発見で きたら， 続く 文字で オプ ショ 

ンの 種類を 判断し， 分岐し ます。 

move.b 

(aO) +，dO 

* もう 1 文字 読み込む 

beq 

一 INIT4 

* $00 なら 解析 終了 

cmp.b 

# ，t，，dO 

* 時制の 設定？ 

beq 

—INIT30 

* なら ば」 NIT30 へ 

cmp.b 

#T 40 

* 時報の 設定？ 

beq 

— INIT31 

* ならば INIT3I へ 

bra 

一 INIT3 

* そ れ 以外なら ば」 NIT3 へ 

それぞれの 設定を レジスタ D：U D2 に 言 £1 表します。 


INIT30 : 


* 時制の 設定 

move.b 

(aO) +，dl 

* さらに 丨 文字 読み込む 

sub.b 

# ，0，，dl 

*’0’ を 引く ことで $00 か $0丨 となる 

bra 

INIT3 


INIT31 : 


* 時報の 設定 

move.b 

(a0) +，d2 


sub.b 

# ' 0 \dZ 


bra 

INIT3 



コマンド ラインの 末尾まで 達したら， それまでに レジスタ D：U D2 に 記録され た 設定を 変 
数に _ します。 

_INIT4 : 

move.w dl,jiseil2(a5) 

move.w d2,jihou(a5) 

で， コマンド ラインの 解析は 終了し， 指定され た オプションの 意味に したがって 変数が 
設定され ま した。 

4：) コント ロ ー ルの 才 ー プン 

この 理は BODY . S の 16 U 亍 目， 
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bsr DrawGraphlst * ウィンドウ 内部を 描画す る 


の 直前に 置く ことにします。 

コントロールの オープン 自体は 難しい ものではありません が， パラメータが 多いた め， 煩雑 
に 見える かもしれ ません。 ここでは， チェック ボックス 1 つを 代表と して， その コードを 示 
して おきます。 


clr.l 

-( sp ) 

move.w 

#£* l 6 t -( sp ) 

move.w 

# l ，_( sp ) 

move.w 

# 0，_( sp ) 

move.w 

jihou ( a 5)，-( sp ) 

move.w 

# - l ，_( sp ) 

pea 

chkBoxTitle ( pc ) 

pea 

chkBoxRect ( pc ) 

pea 

winPtr ( a 5) 

SXCALL 

$ A 289 

lea 

26( sp),sp 

move.l 

aO , chkBoxHdl ( a 5) 


* ユーザ ワーク 
* チェック ボックス 
氺 max 
* min 
* 初期値 
* 可視 

* タイトル （が， 表示し ない） 

* チェック ボックスの レク タング ル 

氺 ウインドウ レコード 

氺 CMOpen 

* コント ロール レコ ー ドへの ハンド 

ルを 保存 


チェ ッ クボッ クスの 初期値 として， オ プショ ンの 指定を 格納した jihou を 指定 している こ 
とに 注目して ください。 タイトル として chkBoxTitle を 指定して はいます が， 実際には 表 
示される ことはありません。 なぜならば， その 次の chkBoxRect に チェック ボックス その 
ものの 大きさし か 持たせず， タイトル はこの 中に 含まれないから です 0 タイトルを 含む ように 
レク タング ルを 設定す る と， タイ トルは CMDraw によって 表^される ようになります が， 夕 
イ トルの 文字を タリ ック しても， チェック ボックスを 押した ことになる という 不都合が 起こり 
ます。 

このほかの コント ロールでは， このような 注意は 必要ありません。 

5) 初期 画面の 描画 

スケルトンでは， 初期 画面を 描画す るた めに DrawGraphlst という サブルーチンを 呼ん 
でい ます。 この サブルーチンは， リージョン や スクリプトを 作成す る 必要が ある 場合を 考えて 
用意し ま したが, 私たちの 時 言 tr ' はとく にそう いった 必要は あり ません。 初期 画面の 描画と いっ 
て も， 通常の 時刻 や， そのほかの 部分の 描画!： なんら 変わりは ない のです。 

そこで， ウィンドウ 内部の 初期 状態を 描画させる ために， DrawGraphlst を 利用す る必 
要は まったくな いので， 例の £ つの 画面 描画 ルーチンと 置き換えて しまいます。 すなわち， 
BODY.S の 161 行 目， 
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bsr DrawGraphlst 

のか わりに 

bsr DrawTime 

bsr DrawOther 

を 置 〈こ とに します。 

この結果， 169 行 目の 


* ウイン ドウ 内部を 描画す る 


DrawGraphlst : 


rts 


* ウイン ドウ 内部の 描画の 
* 準備を する サブルーチン 
* (何も しない） 


は 不要と なります から， 削除して かまいません。 

〇 終了 処理 ルーチン 

終了 処理 ルーチンは， 初期化 ルー チン INIT， ある いは 各イ ベント の 処理 ルーチンで 何 か 
異常な 事態， あるいは 終了し なければ ならない 事態が 発生した とき， メイン ループから 実行に 
移されます。 

ここで 行う 姓理 は， コントロール や ウインドウの クローズです が'， ウインドウの クローズは 
すでに 用意され ている ので， 書かなければ ならない のは コント ロー ルの クローズ だけです。 
B0DY.S178 行 目の 


TINI: 


* [終了 処理] 


の 直後から 書き 始める ことにします。 

コント ロ ー ルの クロ ー ズ は， ある ウインドウ 中に ある コント ロ ー ル （複数） を 1 個 1 個ク 
ローズしても よいので すが， 終了 処理の ように， 一度に すべてを クロー ズ したい 場合は 便利な 
方法が あります 0 SX コール $A28B CMKill がそれ で， クローズしたい コントロールの 乗っ 
た ウイン ドウを 指定す る だけで， すべての コント ロールを クローズ してく れ ます。 


pea 

winPtr(a5) 


SXCALL 

$A28B 

* —CMKill 

addq.l 

#4,sp 
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CDLUMH | 前回の 状態の 再現の 仕組み 

「前回の 状態の 再現」 の 仕組みは 少 々わかりにくい かもしれ ない ので， ここで 解説して おく 
ことにします。 

例と して， SX シェル 上で A という アプリ ケー シ ヨンが 動作して いる ところを 考えて みま 
しょう。 A は ウイ ン ドウを 持って いて， その 中に 何 か 絵を 表示して いたと します （図 a )。 

■図 a 



タスク AWINDDW 


K 〕 


突然， シヱ ルは 終了し なければ なら なくなりました。 ユーザが システム アイコンから 「終 
了」 か， 「再起動」 を 選択した のか， それとも 電源 スイッチが 切られて， いま まさに 電源 切断 
の 予告 段階に 入った ところな のか， それは わかりません が， とにかく 終了を 迫られて います。 
このと き， シェルは， そのと き 動作して いるすべ ての タスクに 対して， システム イベント （夕 
スタ マネージャ イベント コード 31 「状態の 保存」） を 発生し， 状態の 保存を する よう 呼び か 
■図 b 



イベント 31 
「状態の 保存 j 



タスク AWINDDW |^] 


K ) 
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けます （図 b )。 

A にも システム イベントが 通知され， A は 状態の 保存に とりかかります。 A 力 5 ', この 次に 
起動され たと きに， 現在の 状態を 再現す るた めには， 次の 3 つの 情報が 必要です。 

a ) 現在 表示して いる 絵の データ 

b ) 現在の ウインドウの 位置 

c ) 現在の ウインドウ の 大きさ 

これらの 情報 さえ あれば， 次に 起動され たと きに， 現在の ウインドウの 位置に， 現在の ウイ 
ン ドウの 大きさで， 現在 表示して いる 絵を 表示す る ことができる わけです。 ユーザに とって， 
それは 現在と まったく 同じ 状態に 見える はずです。 このうち， A は a ) の 情報 だけ ファイル 
のかたち で 保存し， b ) と c ) は 保存し ません。 これが なぜかは すぐに わかります （図 C )。 
■図 c 




?”AWINDDW 区 


K ) 



TASKA.DAT 


すべての タスクに 「状態の 保存」 を 通知し 終わる と， シェルは いよいよ 本格的に 終了を 始 
めます。 シェル 自身の 終了の 前に， すべての タスクの タスク 管理 テーブルの 一部 + a をファ 
イ ルに 保存し ます 0 フ ァイ ル 名は SYSDTOP . SX 。 SXWIN . X と 同じ ディレクトリに 毎回 
作成され ている この ファイルには， こんな 意味が あった のです。 ここに 保存され る 各 タスク 
に関する おもな 情報と しては， 次の よう な ものが あ ります。 

ア） タスク 名 （原則として フルパスの ファイル 名） 

イ） 起動され たと き に 指定され た コマン ドライ ン 文字列 
ウ） タスクの 走行 状態 や 起動 モード 

エ） その タスクの ウィンドウの 位置 や 大きさ （複数の ウィンドウを 持って いる 場合は， メ 
インの ウィンドウ のみ。 ウインドウを 持たない 場合， ここは 空白） 
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エ） として ウィンドウの 位置 や 大きさを 保存して くれる ので， 結局， A 自身は 自分の ウィ 
ン ドウの 位置 や 大きさを 保存す る 必要がなかった わけです。 シェルは A について， その タス 
ク名や コマンド ライン 文字列な ど と いっしよ に， その 時点での A の ウィン ドウの 位置 や 大き 
さを 記録し ました。 このと き， A の ウインドウの ウインドウ コンテンツは， グローバル 座標 
系で （100， 100)-(200， 150) だった としまし よう （図 d )。 

■図 d 


(100，100) 



タスク A 胃 DDW g] 


K ) 


200 


八 

50 

V 


(100, 100 )-(200,150) 


続いて， シェルは すべての タスクに システム イベント， 今度は タスク マネージ ヤイ ベント 
コード 1 「タスクの 終了」 を 通知し， それぞれの 終了 処理を 行うよう 要求し ます （図 e >。 

■図 e 



「タスクの 終了」 



「タスクの 終了」 要求は， A にも 届き， A は 自分の ウインドウを クローズしたり， 作成した 
メモリ ブロックを 開放したり といった 終了 処理を 行い， 最終的に タスクを 終了させます。 こ 
のとき， タスクの 状態に ついての 情報が ファイルの かたちで 残されて いるの がミソ です （図 
f)o 
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■図 f 



タスク 

A 


終了す るが 
情報は 残る 



TASKA.DAT 


すべての タスクに 「タスクの 終了」 を 要請し 終わる と， シェルは 今度 こそ 自分の 終了 処理 
を 始め， 最終的に 自分自身を 終了 させ， 制御は Human に 戻ります。 

さて， しばらくして， ふたたび SX シェルが 起動され る ことにな りました。 シェルは 各種 
マネージャの 初期化な ど， 自分自身の ための 初期化 終理 を 行って から， 前回の 状態の 再現に 
とり かかります。 SYSDTOP . SX を 読み出 して， そこ に 登録され て いる タスク を 次々 に ファ 
イル などから 起動し ます。 このと き， 各 タスクには SYSDT 〇 P . SX に 保存され ていた コマ 
ン ドライ ン 文字列が 与えられる わけです が， シェルは ここでち よっと した 細工を 行います。 
SYSDTOP . SX に 保存され ていた， 各 タスクの ウィンドウの 位置と 大きさ， これを あたかも 
コマンド ライン 上で- W オプションが 指定され たかの ように， コマンド ライ ン 文字列に つけ 加 
える のです。 A に関して いえば， - W 100， 100， 200， 150 という 文字列が つけ 加えられる 
ことになります。 

ふたたび 起動され た A は， コマンド ライン 文字列の 中に- W 100， 100， 200, 150 とい 
う 指定が ある ことに 気づきます。 - W オプションが 指定され ていた 場合， アプリケーションは 
それに したがって ウィン ドウを 開かなければ なら ない ので， A はこの 位置に ウィン ドウを 開 
きます。 そして， ファイル として， かつて 保存した 情報が 残されて いる ことを 発見す ると， そ 
の 情報に したがって ウィン ドウ 内部に 絵を 描きます （図 g )。 

このよう にして， ふたたび 起動され た A は， 結果 的に 前回の 状態を 再現す る ことができた 
ことになります。 いくつ も 走行して いた タスク カ 5 '， それぞれ このよう な 処理を 行う ことによ っ 
て， SX シェル 終了 直前の 状態が 完全に 再現され るので す。 

なお， 以上の ような 処理は， システム アイコンの 「画面 状態の 保存」 設定で， 「常時 保存す 
る」 を 選択した 場合に 行われます。 「常時 保存し ない」 を 選択して いる 場合， 同じ ダイアログ 
内の 「現在の 状態を 保存」 ボタンを 押した ときに， 全 タスクに 「状態の 保存」 要請が 発せら 
れ， シェルの 終了 時には， いきなり 「タスクの 終了」 要請が 通知され る ことになります。 
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3 モジュールの 作成と LI ンク 


\ 3 | モジュールの 作成と リンク 


プログラムを 機能 単位で 分割して， 修正 や ほかの プログラムへの 流用を 容易に する 手法を 「モ 
ジュール 化 j と 呼びます。 プログラムの ソースの 分割は， モジュール 化を 行 ララえ でたい へ 
ん 基本的， かつ 重要な 手法の 1 つです。 モジュール という 独立した 機能 単位に 分割す る こと 
によって， プログラマが 一度に 見渡すべき 範囲は 小さくて すみます。 巨大な ソースの 中に 埋 
もれて しま 5 と 発見し にくくなる バグ も， こ 5 して 比較的小 さな モジュールに 区切る ことに 
よって， 発見が 容易と なります。 さらに， こうす る ことによって， プログラムの ドキ ュメン 
卜 性 も 向上し ます* 1 。 

*丨： 長々 と 続く 文章よりも， 的確に 句読点を 打ち， 段落 分け， 章 分けを 行った 文章の ほうが 読み やす 
いのと 同じ ことです。 

モジュールは， プログラム として ある 程度 独立して いるた め， モジュール ごとの デ、 パ、 ッグが 
可能！： なること も 利点の 1 つです* 2 〇 バグが 発見で きた 場合， 再 コンパイル/アセンブル する 
必要が あるのは， 分割され た 小さな ソースが 1 つです から， 実行 ファイルが 生成され るまで 
の 時間 も 短! 宿で きます。 

*2: たとえば， ごく 小さな テス ト 用の メイン モジュールを 用意して， そこで 最小限の 初期化と 目的の 
モジュールの 呼び出しを 行えば， その モジュールが 担う 機能 だけにつ いて 動作 チェックが 可能と 
なります。 

難点と して， ファイルが 多く なって く ると 管理が* しく なって く る ことが 挙げられ ますが， 
これには make と 呼ばれる ツールを 使って 対 欠 t する ことができます。 make は C コンパイラ 
Ver .2.0 に 付属し ま すが， フリーソフトウェアの make も 入手 可能です ので， 興味の ある 方は 
ぜひ 利用して みて く ださい (87 ページの コラム 参照)。 本書では make に関して 詳しい 説明は 
省きます が， 各 サンプル プログラムを 生成す るた めの makefile を 示して お 〈ことにします 0 
本書で 示す スケルトンの コードは， SKELTON.S と BODY.S に 分割され ています。 前 
者は， 「メイン モジュール」 として もっとも 基本的な， プログラムの 根幹を なす 部分が 収めら 
れ ており， 後者は， ここから 呼び出される さまざまな サブルーチンが 収められ ている 「初期化 
& 終了 & イベント 处理 モジュール」 です。 たった 2 つの 分割では あります が， 私たちの 時計 
を 作成す るに あたり， SKELT 〇 N.S には まったく 手を 触れずに すんだ ことから も， フ ァイ 
ル 分割， および モジュール イ 匕の 意義を いく らか 汲み取って いただけ ると 思います。 

さらに 大 規| 臭な アプリケーションを 作成す る 場合には， BODY.S を さらに 分割す る ことが 
考えられます。 アプリケーションの 規模 や， 今後の アプリケーションへの 流用の 可 有 生な ども 
考えて， 適当に 分割して 利用す るの もよ いでしょう。 

いまの 規模で も， 分割に よって メリットが 得られる と考えられるのは 描画 ルーチンです。 単 
^6 に ウイン ドウを 出す た ^ けの， スケル ト ン にわず かに 手を 加えた テス ト プログラムと， 描画 ルー 
チンの モジュールを 組み合わせる こ とに よって， 描画 ルー チンに よる 表示の ぐあいを 確かめる 
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ことができます。 文字の 表^ 位置な どの 微調整を 行う）： きに 有効で' しよう。 

前節で 作成した コードを ソースファイル として 完成 させた ものが， MyClock.S (リスト £) 
と， 変数の 定義を 行って いる WORK. INC (リスト 1) です。 MyClock.S は スケルトンの 
BODY.S に， WORK.INC は スケルトンの 同名の ファイルに 手を 加えた もので， SXCALL. 
MAC, SKELTON.S と リンクして 使用し ます。 

■ リスト 1 WORK.INC 


SX-WIND0W 

サンプル プログラム# 1 

ワーク 定義 用イ ン クルー ド ファイル 


8 STKSIZE 

Q 


2*1024 

本 

スタック サイズ 

y 

10 * 

1 1 

ワークの 内容の 定義 



11 

12 

. offset 

0 



13 cmdLine: 

14 

ds. 1 

1 

本 

本 

コマンド ライ ンのア ドレス 
を 保存す る ワーク 

15 envPtr: 



* 環境の ァ ドレスを 




t 

保存す る ワーク 

16 

ds. 1 

1 



17 winRect: 

一 


本 

本 

ウィン ドウ レク タング ル 
レコ ー ド 

18 

19 paramF i g : 

ds. 1 

2 

* 

t 

コマンド ライ ンの 

解 祈 結果を 示す 

20 

ds. w 

1 

本 

フ ラタ 

21 even tRec : 



* 

イベント レコ ー ドの 先頭 

22 eventRec 

what : 


本 

イベント コード 

23 

ds. w 

1 



24 eventRec 

whom! : 


本 

第 1 引数 

25 

ds. 1 

1 



26 eventRec 

when : 


本 

イ ベン ト 発生 時 

27 

ds. 1 

1 



28 eventRec_whom2 : 


* 第 2 引数 

29 

ds. 1 

1 



30 eventRec 

what2 : 




31 

ds. w 

1 

* 

本 

タスク マネージャ イ 
ベン トの 種類 

32 eventRec 

■taskID: 




33 

ds. w 

1 

本 

送り手の タスク 丨 D 

34 eventMas k 



t 

* 

イ ベン ト マスクを 保存す る 
ワーク 

35 

36 task 1 D: 

ds. w 

1 

本 

タスク 1 D を 




* 保存す る ワーク 

37 

38 winPtr : 

ds. 1 

1 

本 

* 

ウィンドウ レコードを 

作成す る 場所 

39 

ds. b 

$72 



40 

41 winActive 

42 

ds. w 

1 


アクティブ フラグ 

43 

44 t imeStr : 

45 

46 

ds. b 
. even 

9 

* 

時刻 文字列 +1 ($00) 
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47 jisei12: 

48 

ds. w 1 

t 1 2 時制 フラグ 

49 j ihou: 

50 

ds. w 1 

* 時報 フラグ 

51 

52 1 astT imeUpdate : 

53 

54 

ds. 1 1 

* 最後に 時刻を 更新した 時刻 

55 chkBoxHd 1 : 

56 

ds. 1 1 

拿 チ ヱ ッ クポッ クスの 
本 コン ト □ー ルレ コードへの 

57 radIHdl: 

58 

ds. 1 1 

* ハン ドル 

* ラジオ ボタン 1 の 

ネ コン ト ロ ー ル レコ ー ド 

59 rad2Hdl: 

60 

ds. 1 1 

* への ハン ドル 
本 ラジオ ボタン 2 の 
* コン ト □ー ル レコー ドへの 

61 

62 WORKSIZE: 

63 


* ハン ドル 

* ワークの 終了 


■ リスト 2 MyClock.S 


SX-WIND0W 
MyC I ock. s 

初期化 & 終了 & イ ベン ト 処理 モジ： L — ル 


. include DOSCALL. MAC 

. include SXCALL. MAC 

. xdef INIT，_TINI 

• xdef Idle 

• xdef MSI DOWN, MSLUP, MS R DOWN, MSRUP 


14 

. xdef 

KEYDOWN, KEYUP 




15 

. xdef 

UPDATE, ACTIVATE 




16 

17 

. xdef 

SYSTEM!, SYSTEM2, SYSTEM3, SYSTEM4 

If 

18 

. include 

i WORK. INC 

* 

ワーク エリアの 内容 




* 

を 定義す る ファイル 

19 






20 WIN0PT 

= 

%0000 

* 

ウィン ドウ オプション 

21 WIN X 

= 

160 

本 

ウィン ドウ 初期 X 

22 WIN Y 

= 

80 

* 

ウィン ドウ 初期 y 

23 






24 

. text 





25 MSLUP: 



* 


レフ ト アップ イ ベン 

26 MSRDOWN: 



本 


ライ ト ダウン イ ベン 

27 MSRUP: 



本 


ライ ト アップ イ ベン 

28 KEYDOWN: 



本 


キー ダウン イベント 

29 KEYUP: 



本 


キー アップ イベント 

30 SYSTEM3: 



* 


システム イベント 3 

31 SYSTEM4: 



本 


システム イベント 4 

32 

moveq 

«0, dO 

本 

以上の イ ベン トでは 




本 

なにもし ない 

33 

rts 





34 






35 IDLE: 



* 

1 

[ アイ ドル イベント ] 

36 

move. 1 

eventRec_when (a5) , d 1 

本 

ィ ベン ト 発生 時刻を 


D1C 


77 


第 1 章 プログラミングの 補足説明 


* イベント 発生 時刻を 保存 


* 時報を 鳴らす？ 

* 鳴らさないなら IDLE9 へ 

t TIME6ET 

* IOCS 呼び出し 

* 00 分 00 秒？ 

* でなければ IDLE9 へ 

* 1 回 

本 .OMBeep 


t of IDLE 


本 [レフ ト ダウン イベント] 

* 自分の ウィン ドウ 上で 
* 発生した か？ 
t 違うなら MSLD 9 へ 

t 現在 ウィン ドウは 
* アクティブ か？ 

\ アク ティ ブ なら MSLD1 へ 

t _ WMSe I ect 

* アクティブに する だけ 


* ウィンドウ 処理 

* _SXCai IWindM 

* どこも 操作され なかった？ 

* ならば MSLD9 へ 

* クローズ ボタン？ 
t ならば Gl oseBttn へ 

* ウィンドウ コ ン テン ツ？ 

* でなければ MSLD9 へ 

t dRectPtr (省略） 

* ctrlHdIH (省略） 

* ctrlHdIV (省略） 

* イベント レコー ド 
* への ボイ ンタ 

* ウィンドウ レコード 
i への ボイ ンタ 

* 一 SXCal ICtrIM 

* コント □ ー ル 上？ 

* でなければ MSLD9 へ 


move. I dl, du 

sub. I I as tT imeUpdate (a5) , dO 

卿 . i moo, do 

bcs IDLE9 

move. I dl t I astT imeUpdate (a5) 
bsr DrawTime 

tst.w j i hou (a5) 
beq I DLE9 

moveq l$56, dO 
trap 1115 
tst.w dO 
bne IDLE9 

move, w #2, - (sp) 

SXCALL $A2D7 
addq. I 丨 2, sp 

moveq HO. dO 
rts 


move. I eventRec_whom1 (a5) , aO 
lea winPtr (a5) , a2 

cmp. I a2, aO 
bne MSLD9 

tst. b winAct i ve (a5) 

bne MSLDI 
pea (a2) 

SXCALL $A1FE 
addq. I #4, sp 
bra MSLD9 

pea eventRec (a5) 

pea (a2) 

SXCALL $A3A2 
addq. I 18, sp 
tst. I dO 
beq MSLD9 

cmp. w #7, dO 
beq C I oseBttn 

cmp. w #3, dO 
bne MSLD9 

cl r. I - (sp) 
cl r. I - (sp) 
c I r. I - (sp) 
pea eventRec (a 5) 

pea (a2) 

SXCALL $A3A3 
lea 20 (sp) , sp 
tst. I dO 
beq MSLD9 


37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 IDLE9: 

57 

58 

59 

60 

61 MSLDOWN: 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 MSLDI: 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 


の y 
らる LE 
え かめ ？ ID 
換刻求 過 ば 
き 時を 経れ 
書 厶間 上け 
の テ時以 な 
回ス過 秒で 
前シ 街1 


1 〇〇 4 C 3 

Qo QU Qw Qw QW 
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96 

97 

98 

99 

100 

101 

102 

103 

104 

105 MSLD ChkBox: 

106 


111 MSLDJadl: 


115 MSLD_Rad2: 


118 MSLD Rad: 

119 

120 
121 
122 

123 

124 

125 

126 

127 

128 

129 

130 * 

131 MSLD9: 

132 

133 

134 

1 35 C I oseBttn ： 

136 

137 

138 

139 UPDATE: 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 


cmp. I chkBoxHd I (a5), aO 

beq MSLD_ChkBox 

cmp. I rad IHd I (a5) , aO 

beq MSLDJadl 

cmp. I rad2Hd I (a5) , aO 

beq MSLD_Rad2 

bra MSLD 互 


move. 1 

chkBoxHd 1 (a5) , - (sp) 

SXCALL 

$A291 

addq. 1 

¢4, sp 

move, w 

d0, j ihou (a5) 

bra 

MSLD9 

moveq 

UK dl 

moveq 

HO, d2 

bra 

MSLDJad 

moveq 

HO, dl 

moveq 

#1, d2 

move, w 

dl, j ise i 12 (a5) 

move, w 

dl, - (sp) 

move. 1 

radIHdl (a5) , - (sp) 

SXCALL 

SA290 

addq. 1 

tt6, sp 

move, w 

d2, - (sp) 

move. 1 

rad2Hdl (a5),-(sp) 

SXCALL 

$A290 

addq. 1 

#6, sp 

bsr 

DrawT ime 

bra 

MSLD9 

moveq 

rts 

10, dO 

moveq 

rts 

M, dO 

pea 

winPtr (a5) 

SXCALL 

$A20D 

addq. 1 

R sp 

bsr 

DrawT ime 

bsr 

DrawOther 

pea 

winPtr (a5) 

SXCALL 

SA20E 

addq. 1 

U, sp 

moveq 

rts 

H0 t do 


t チ:!： ック ボックスが 
ネ 操作され た？ 

* ならば MSLD ChkBox へ 
* ラジオ ボタン 1 が 

* 操作され た？ 

* ならば * MSLD Radi へ 
* ラジオ ボタン 2 が 
* 操作され た？ 

* ならば MSLD Rad2 へ 
* これら 以外の 場合は 

* MSLD9 へ 


t チ I ック ボックスへの 
* ハン ドル 

本 CMVa I ue6e t 


* MSLD9 へ 

* ラジオ ボタン 1 を 〇 n に 
I ラジオ ボタン 2 を 〇 f f に 


* ラジオ ボタン 1 を 〇 f f に 
* ラジオ ボタン 2 を 〇 n に 

* jisei12 に 値を 設定 


* ラジオ ボタン 1 に 値を 設定 
* CMVal ueSet 


ネ ラジオ ボタン 2 に 値を 設定 
t _ CMVal ueSet 

* 切り替えられた 時制 
* で 時刻を 再 描画 


* [ アップ デ ー ト イベント】 

* WMUpdate 

* アップ デ _ 卜 開始 


* _WMUpdtOver 
* アップ デー ト 終了 


7 〇〇 9 〇 
〇 nu 〇 1 
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* アクティヴ フラグを 
t リセ ット 


* [ システム イベント 1 ] 

* [ システム イベント 2 ] 

* タスクの 終了？ 

* ならば LetsGoAway へ 

* 全 ウィン ドウの クローズ？ 

* ならば LetsGoAway へ 

本 ウィン ドウの セレクト？ 

* ならは "WindowSelect へ 
* 状態の 保存？ 

* ならば Save へ 


* 自分の ウィン ドウを 
* セレ ク トする 
* WMSe I ect 


*51 2 バイ トの 領域を 確保 

% 自分の タスク 管理 テープ ル 
* を 取得 

* スタック 上の 領域に 
* 読み込む 
本 TSGetTdb 


* A 0: 文字列 先頭 （文字 数） 

* A 1: 文字列 実体 先頭 

* スペースで ア ドレス 補正 

* • -tl • 

* 1 2 時制？ 

* ならば SaveO へ 

本 ， - tO , 


t [アク ティ ベイ ト イベント 1 


154 

155 

156 

157 

158 

159 

160 
161 
162 

163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 
181 
182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 


200 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 
211 
212 
213 


ACT I VATE : 


move. I eventRec_whom1 (a5) , d0 

beq ACT9 

lea winPtr (a5) , aO 

cmp. I a0, dO 

bne ACT0 

st winAct i ve (a5) 

bra ACT9 


ACT0: 


sf 


ACT9: 


SYSTEM1: 

SYSTEM2: 


cmp. w 
beq 
cmp. w 
beq 
cmp. w 
beq 
cmp. w 
beq 


Al I C I ose : 


Wi ndowSe I ect : 


pea 


Save : 


winAct i ve (a5) 


moveq HO, dO 
rts 


move, w eventRec_what2 (a5) , 


dO 


#1, dO 
Al I C I ose 
U, dO 
All C I ose 
11)20. dO 
Wi ndowSe I ect 
H31, dO 
Save 


moveq #0, dO 
rts 


moveq jt-1, dO 
rts 


winPtr (a5) 


SXCALL $A1FE 
addq. I H sp 

moveq HO, dO 
rts 


SaveO : 


link 
move, w 
pea 

SXCALL 
addq. I 

lea 

lea 

move, b 
move. I 
tst. w 
bne 

move, w 
move. I 


a4, #-512 

IN, - (sp) 

-512(a4) 

$A35B 
U, sp 

-512 + $5a(a4), 
2(a0). al 
r M (aO) 

IT -t ド ， dO 
jisei12(a5) 
SaveO 

r 0 *,d0 
dO, (a1) + 


aO 


ヅ 

? セ 
がた へを 
ウ つ To グ 

ドな Ac ラ 

ン にら フ 
ィブな ブ 
ウィの ィ 
の テう テ 
分 ク違ク 
自ア ア 
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3 モジュールの 作成と リンク 


* 正しい レク タング ルが 
* 指定され たか どうか 
* を 調べる 


本 _ TSGetWi ndowPos 
* デフ ォル ト 位置を 得る 

本 ウィン ドウ レク タング ル 
* を 作成 


本 jiseM2 に 入る 値 
*j i hou に 入る 値 

* コマンド ライ ンのア ドレス 

* 文字 数 

* 文字列 末尾に $00 を 付加 

* 1 文字 読み込み 

* $00 なら 解析 終了 
* オ プショ ン 文字？ 

t でなければ JNIT3 へ 

t もう 一文字 読み込む 

* $00 なら 解析 終了 


♦ -jl.,0 
* 時報を 鳴らす？ 

ネ ならば Save 丨へ 

本 ， - j0，，0 


t 自分の タスク 管理 テー ブル 
* に 書き込む 

* スタ ック 上の コピーから 
* TSSetTdb 


* スタック 上の 領域を 開放 


t [ アプリケーション 
* の 初期化を 行なう】 


move. I f -j| f . shl. 8, dO 
tst. w j i hou (a5) 
bne Save! 

move, w IT 0’ . shl. 8, dO 

move. I d0 ， （ al) 

move, b 17+1, (aO) 
move, w j|-1 r - (sp) 

pea -512 (a4) 

SXCALL $A35C 
addq. I #6, sp 

uni k a4 

moveq HO, dO 
rts 


move. I wi nRect (a5) f dO 
move, w paramF I g (a5) , d I 
btst HO, dl 

beq _INIT0 


move. I winRect+4 (a5) r dl 
beq _INIT1 

tst. w dl 

cmp. w dO, dl 

ble JNIT1 

swap dO 

swap d I 

cmp. w dO, dl 

bgt JNIT2 

swap dO 

swap dl 

bra _INIT1 

SXCALL $A35E 

move. I dO, wi nRect (a5) 

add. I HWIN_X*$10000+WIN_Y, dO 

move. I dO, winRect+4 (a5) 

moveq ItO, dl 

moveq HO, d2 

move. I cmdL i ne (a5) , aO 

moveq HO, dO 

move, b (aO) +, dO 

s f (a0 t dO. w) 

move, b (aO) +, dO 
beq JNIT4 
cmp. b f - f dO 
bne _INIT3 

move, b (aO) +, dO 
beq INIT4 


224 

225 

226 

227 

228 

229 

230 

231 

232 

233 _INIT: 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 _INIT0: 
252 一 

253 

254 _INIT1: 

255 " 

256 

257 _INIT2: 
258 一 

259 

260 
261 
262 

263 

264 _INIT3: 

265 

266 

267 

268 

269 

270 

271 


ず 

n( 

がけ 
ン な 
m ? い 
シ たて 
プれれ へ 
才 ささ To 
W 定定 N 1 
_ 指 指 丨_ 


4i CJ no r 〇〇 cn cvj 〇〇 

l* n n n n n o£ o£ 
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第 1 章 プログラミングの 補足説明 


本 コン ト ロー ルレ コードへの 

* ハン ドルを 保存 


* ユーザー ワーク 
* ラジオ ボタン 
% max 

* 初期値 （ jisei12 と 同じ） 

* 可視 

本 タイトル （が 表示し ない ) 
% ラジオ ボタン 1 の 
* レク タング ル 

本 ウィンドウ レコード 


ネ 時制の 設定？ 

% ならば INIT30 へ 
* 時報の 設定？ 

本 ならば INIT31 へ 
t それ 以外なら ば JNIT3 へ 
ネ 時制の 設定 
% さらに一 文字 読み込む 
本 ’ 0’ を 引く ことで 
* $00 か $01 となる 

* 時報の 設定 


% TSGetID 
t タスク 丨 D を 得る 


272 


cmp. b 

r dO 

273 


beq 

INIT30 

274 


cmp. b 

5’ T,d0 

275 


beq 

INIT31 

276 

277 

_INIT30: 

bra 

_INIT3 

278 


move, b 

(aO) +，dl 

279 


sub. b 

r o., di 

280 

281 

JNIT31: 

bra 

JNIT3 

282 


move, b 

(a0)+, d2 

283 


sub. b 

r 0. ,d2 

284 

285 

_INIT4: 

bra 

JNIT3 

286 


move, w 

dl, j ise i 1 2 (a5) 

287 

288 


move, w 

d2, jihou(a5) 

289 


SXCALL 

SA360 

290 

291 


move. 1 

d0, task 1 D (a5) 

292 


move. 1 

d0 f - (sp) 

293 


move, w 

H-1, - (sp) 

294 


move. 1 

i- 1, - (sp) 

295 


move, w 

H$20*16+WINOPT.-(sp) 

296 


move, w 

¢-1, - (sp) 

297 


pea. 1 

wi nT i 1 1 e (pc) 

298 


pea. 1 

winRect (a5) 

299 


pea 

winPtr (a5) 

300 


SXCALL 

$A!F9 

301 


lea. 1 

26 (sp), sp 

302 


tst. 1 

dO 

303 


bmi 

JNITjrr 

304 


St 

winAcTi ve (a5) 

305 


cl r. 1 

1 as tT imeUpdate (a5) 

306 

307 


clr. 1 

-(sp) 

308 


move, w 

#2*16, -(sp) 

309 


move, w 

#1, - (sp) 

310 


move, w 

#0, - (sp) 

311 


move, w 

j i hou (a5) , - (sp) 

312 


move, w 

i-i, - (sp) 

313 


pea 

chkBoxT i 1 1 e (pc) 

314 


pea 

chkBoxRect (pc) 

315 


pea 

winPtr (a5) 

316 


SXCALL 

$A289 

317 


lea 

26 (sp), sp 

318 


move. 1 

aO. chkBoxHdl (a5) 

319 

320 

321 


move, w 

jisei12(al),d1 

322 


c 1 r. 1 

- (sp) 

323 


move, w 

HU16,-(sp) 

324 


move, w 

tl - (sp) 

325 


move, w 

HO, - (sp) 

326 


move, w 

di, - (sp) 

327 


move, w 

i-1, -(sp) 

328 


pea 

rad IT i 1 1 e (pc) 

329 


pea 

rad 1 Rect (pc) 


pea 


winPtr (a5) 


り 

あ 

ンにゥ 
夕 前 ド 
D ボ手ン 
—ズ もイ 
クーと ウ 


グ 
ルン 
トタ 
イク 成 
タレ 作 
ウウに 


く 

開 

を 

ウ 


ヅ 

へ セ 
1 を 
Er グ 
T ー ラえ 
N1 フ換ア 
丨 1 ブきリ 


ドド 上 en ド？ ば イ書ク 
ンンク OP ン I ら テのを 
ス □つ 準視 イイ I WMI イラな ク回刻 
タク も標可 ウウワ I ウエ ア前時 


\#/ 

fv 

な 

し ド 
ス 示ス I 
クク 表 クル n 
I ッ がッ グレ 
ヮボ {ボン ゥ 
I ク ル クタ ド en 
ザッ 値トッ クン OP 
| H X n 期視ィ H レィ CM 
ユチ ma mi 初 可 タチの ゥ | 
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3 モジュールの 作成と LI ンク 


331 

SXCALL 

$A289 

* — CMOpen 

332 

lea 

26 (sp), sp 


333 

move. 1 

a0. radlHdl (a5) 

本 コン ト ロール レコ ー ドへの 

334 



* ハン ドルを 保存 

335 

eor. w 

a di 

* jisei12( 0->1 , 1->0) 

336 




337 

c 1 r. 1 

- (sp) 

* ユーザー ワーク 

338 

move, w 

#m6,-(sp) 

* ラジオ ボタン 

339 

move, w 

ii, - (sp) 

% max 

340 

move, w 

io, - (sp) 

t min 

341 

move, w 

dl, - (sp) 

* 初期値 （j ise i 12 の 逆） 

342 

move, w 

j-l, - (sp) 

* 可視 

343 

pea 

rad2T i 1 1 e (pc) 

本 タイトル （が 表示し ない） 

344 

pea 

rad2Rect (pc) 

* ラジオ ボタン 2 の 




* レク タング ル 

345 

pea 

wi nPtr (a5) 

* ウィンドウ レコード 

346 

SXCALL 

$A289 

t __ CMOpen 

347 

lea 

26 (sp), sp 


348 

move. 1 

aO, rad2Hdl (a5) 

* コン ト □ー ルレ コードへの 

^49 



* ハン ドルを 保存 

350 

bsr 

DrawT ime 


351 

bsr 

DrawOther 


352 




353 

moveq 

HO. dO 


354 

rts 



355 INIT Err: 




356 " ' 

moveq 

M, dO 


357 

rts 



358 




359 DrawT ime : 



* 時刻を 描画す る 




* サブ ルー チン 

360 

pea 

winPtr (a5) 


361 

SXCALL 

$A13I 

* GMSetGraph 

362 

addq. 1 

“， sp 


363 




364 

moveq 

#$56, dO 

本 TIMEGET 

365 

trap 

#15 

* IOGS 呼び出し 

366 

move. 1 

dO, di 


367 

moveq 

1)57, dO 

* TIMEBIN 

368 

trap 

1115 

* IOGS 呼び出し 

369 




370 

move, w 

r ，， d 7 

* 丨 2 時制の 場合、 後で 




* AM/PM の 文字列を 入れる 

371 

swap 

dO 

* 上位 ワー ドの 時の 位 




* を 下位に 

372 




373 

tst. w 

j ise i 12 (a5) 

* 丨 2 時制 かどう かの フラグ 

374 

beq 

DrawT ime2 

* 24 時制なら DrawT ime2 へ 

375 




376 

cmp. w 

H12, dO 

* 12 時 以降？ 

377 

bcc 

DrawT imeO 

* ならば 午後な ので 




t DrawTimeO へ 

378 




379 

move, w 

r AM ， ， d7 

* 午前 

380 

bra 

DrawT ime 1 


381 DrawT imeO : 




382 

move, w 

It ， PM. ， d7 


383 

sub. w 

H12, dO 

* 12 時間 引く 

384 DrawT ime 1 : 




385 

tst. w 

dO 

本 0 時？ 

386 

bne 

DrawT ime2 

* でなければ DrawT ime2 へ 

387 
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第 1 章 プログラミングの 補足説明 


* of Drawl ime 

* 時刻 以外を 描画す る 
* サブ ルー チン 


* 丨 2 時に 直す 

* 上位/下位 ワードを 
* 元の 順に 戻す 

* D1 : 時刻 

* A1 : 文字列が 返る バッファ 

への ボイ ンタ 

* TIMEASC 

t IOCS 呼び出し 

* バックグラウンド 
* カラーで 描画 
t GMPenMode 

* 塗り潰すべき 四角形の 内側 
本 GMFi I IRect 


* 24X24 

t GMFontK i nd 

t イタリック + ポール ド 

* GMFontFace 

t pset 

本 GMPontMode 
* 黒 

* GMForeCo I or 


* (24,8) 
t GMMove 

* 時刻 文字列の バッファ 

* GMDrawStrZ 


* 12X12 

t GMFontK i nd 

* ボ ー ルド 

* GMFontFace 


* (1 36, 20) 

* GMMove 


388 

move, w 

H12, dO 

389 DrawT ime2 : 



390 

swap 

dO 

391 

move. 1 

dO. dl 

392 

lea 

t imeStr (a5) , al 

393 

moveq 

H$5b, dO 

394 

trap 

#15 

395 



396 

move, w 

#$100, -(sp) 

397 

SXCALL 

$A144 

398 

addq. 1 

n, sp 

399 

pea 

timeRectlns ide (pc) 

400 

SXCALL 

$AI73 

401 

addq. 1 

sp 

402 



403 

move, w 

12, -(sp) 

404 

SXCALL 

$A18B 

405 

addq. 1 

i2, sp 

406 

move, w 

noooa-(sp) 

407 

SXCALL 

$A18C 

408 

addq. 1 

U, sp 

409 

move, w 

#0, - (sp) 

410 

SXCALL 

$A18D 

411 

addq. 1 

H2, sp 

412 

move, w 

川 .- (sp) 

413 

SXCALL 

$A147 

414 

A 1 C 

addq. 1 

R sp 

4 1 D 

416 

move. 1 

H$ 0018 000 8, -(sp) 

417 

SXCALL 

$A16E 

418 

addq. 1 

¢4, sp 

419 

pea 

t imeStr (a5) 

420 

SXCALL 

$A192 

421 

addq. 1 

sp 

422 



423 

move, w 

HO, - (sp) 

424 

SXCALL 

$A18B 

425 

addq. 1 

«2, sp 

426 

move, w 

■ 0001 ， -(sp) 

427 

SXCALL 

$A18C 

428 

addq. 1 

#2, sp 

429 



430 

move. 1 

¢$0088 001 4, -(sp) 

431 

SXCALL 

$A16E 

432 

addq. 1 

U, sp 

433 



434 

swap 

d7 

435 

c 1 r. w 

d7 

436 

move. 1 

d7, - (sp) 

437 

pea 

(sp) 

438 

SXCALI 

$A192 

439 

addq. 1 

18. sp 

440 



441 

rts 


442 



443 DrawOthe r : 




く 

に 置の 
, 0 上て 上 
. 0 る 厶し厶 
M r な 一と 一 
A に レ 列 レす 
は 式 フ字フ 指 rz 
D 7 形 ク文ク を St 
でう ッ IZ ッ列 aw 
れい 夕 cl 夕字 Dr 
こと ス As ス文 GM 


84 


444 


pea 


wi nPtr (a5) 


3 モジュールの 作成と リンク 


445 

SXCALL 

$AI31 

446 

addq. 1 

R sp 

447 



448 

pea 

t imeRectOutside (pc) 

449 

SXCALL 

$A1A2 

450 

addq. 1 

“， sp 

451 



452 

pea 

winPtr (a5) 

453 

SXCALL 

$A28E 

454 

addq. 1 

H, sp 

455 



456 

move, w 

10, - (sp) 

457 

SXCALL 

$A18B 

458 

addq. 1 

#2, sp 

459 

move, w 

nooooo ， -(s P ) 

460 

SXCALL 

$A18C 

461 

addq. 1 

12, sp 

462 



463 

move. 1 

H$ 0054 _0040 ， -(sp) 

464 

pea 

chkBoxT i 1 1 e (pc) 

465 

SXCALI 

$A1A1 

466 

addq. 1 

U, sp 

467 



468 

move. 1 

林 $ 000 C_0034 ， -(sp) 

469 

pea 

radGT ill e (pc) 

470 

SXCALI 

$A1A1 

471 

addq. 1 

Il8 f sp 

472 



473 

move. 1 

#$003G_0028 ， -(sp) 

474 

pea 

radIT i 1 1 e (pc) 

475 

SXCALI 

SAIA1 

476 

addq. 1 

18, sp 

477 



478 

move. 1 

H$ 0078 _0028 ， -(sp) 

479 

pea 

rad2T iTl e (pc) 

480 

SXCALI 

$AIAI 

481 

addq. 1 

18, sp 

482 



483 

rts 


484 



485 



486 TINI : 



487 

pea 

winPtr (a5) 

488 

SXCALL 

$A28B 

489 

addq. 1 

“， sp 

490 



491 

pea 

winPtr (a5) 

492 

SXCALL 

$AIFB 

493 

addq. 1 

H sp 

494 



495 

moveq 

HO, dO 

496 

rts 


497 



498 

. even 


499 winTitle: 



500 

dc. b 

5, • Clock' 

501 



502 chkBoxT i 1 1 e : 



503 

dc. b 

■ 時報を 鳴らす ' 0 

504 radGTitle: 




* GMSetGraph 


t GMShadowRec t 


t CMDraw 


* 12X12 

* GMFontKind 

* 装飾な し 

* GMFontFace 


t (84,64) 

♦ チ：！： ック ボックスの 
* タイ ト ル 文字列 （ASCI IZ) 
t GMShadowStrZ 


* (12,52) 

* ラジオ ボタン グループ 
* タイ トル 文字列 (ASCII Z) 
t GMShadowStrZ 


* (60,40) 

* ラジオ ボタン 1 の 
* タイ ト ル 文字列 （ASCII Z) 
本 GMShadowStrZ 


* (1 20, 40) 

* ラジオ ボタン 2 の 
* タイ ト ル 文字列 （ASCI IZ) 
本 GMShadowStrZ 


* of DrawOther 

* [ 終了 処理 ] 

* 一 CMKill 

* ウィン ドウを クローズ する 
i WMC lose 

t WMDispose でない ことに 注意 

* I 固定 データ ] 

* ウィンドウ タイトル 
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第 1 章 プログラミングの 補足説明 


505 

506 

radl T i 1 1 e : 

dc. b 

• 時制 .， 0 

507 

508 

rad2Title: 

dc. b 

* 12 時制 \0 

509 

510 

511 

512 

t imeRectOuts i de : 

dc. b 

. even 

1 24 時制 ’， 0 

513 

514 

t imeRect 1 ns i de : 

dc. w 

4,4, 156,36 

515 

516 

chkBoxRect : 

dc. w 

4+2, 4+2, 1 56-2, 36-2 

517 

518 

radl Rect : 

dc. w 

60, 64-6, 78, 82 

519 

520 

rad2Rect : 

dc. w 

60, 52+2, 96, 62+2 

521 

522 

523 

524 


dc. w 

. end 

120, 52+2, 1 56, 62+2 


先 ほど 組み立てた コードが， どのように BODY . S の 中に 埋め こまれて いるか， また， 必 
要な 変数が WORK . INC の 中で どのように 定義され ている かを 5 鶴 忍して ください。 

アセンブルを 開始す る 前に， 準備と して， SXCALL . MAC ， WORK . INC を インク ルー 
ド 可能な ディレクトリに， SKELTON . S と MyClock . s を 同じ ディレクトリ に 置いて おい 
てくだ さい* 3 。 普-通は， これら 4 つの ファイルを すべて 同じ ディレクトリに 置いて おけば よ 
いでし ょう。 以降， そのよう に 想定して 話を 進める ことにします。 

*3: 各 ファイル 中の include 擬似 命令で， SXCALL . MAC , WORK . INC の パスを 指定す る， あるいは ァ セン 
ブラの / i オプ シヨ ンを 使う ことによって， どこの ディ レクト リ からで も インク ルー ドす る ことは 
可能です が， そこまでして 別の ディ レク トリに 置く 意味は ない と 思われます。 

まずは， 各 ファイルの アセンブルを 行います 0 


A>AS SKELTON 13 
A>AS MyClockH 


それぞれの ファイルが 正常に アセンブル できれば よし， エラーが 発生した 場合は， エディタ 
で 入カ ミスな どを チェックして， エラーの 出た ファイルを 再度 アセンブルして ください （ここ 
で エラーの 出なかった 方には 再 アセンブルの 必要がない こと も ファイル 分割の 恩恵です)。 
正常に ア セン ブルで き た 場合は， 


SKELTON.o 

MyClock.o 
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という 2 つの オブジェ ク トフ アイ ルが 作成 さ れ ている はずです。 これら 2 つの フ アイ ルを リ 


3 モジュールの 作成と II ンク 


ンク して， 実行 ファイル MyClock . x を します 0 


A>LK -0 MyClock SKELTON MyClockH 


正常に 終了 した 場合は MyClockJc が 作成され ている はずです。 この 段階で エラーが 発生 
した 場合は， SKELTQN . S ， MyClock . S の xdef , xref 宣言の あたりを 調べて みて くだ 

さい。 

なお， この 作業を make を 使って 行う 場合の makefile は 以下の ようになり ます。 

SKELTON . 0: SKELTON . S WORK . INC SXCALL . MAC 

AS SKELTON . S 

MyClock . 0: MyCLock . S WORK . INC SXCALL . MAC 

AS MyClock . S 

MyClock . X : SKELTON . 0 MyClock . 0 

LK -OMyClock SKELTON MyClock 


column ■ make について 


フ ァイ ルを 分割 して コンパイル/アセンブルを 行う 場合， 厄介な のは ファイルの 管理で ある 
ことは 本文 中で 述べました。 この 問題に ついて， 例を 挙げて 説明し ましよう。 

A , B , C の 3 つの ファイルで 構成され る プログラム ABC が あった としまし よう。 A ， B ， 
C それぞれの ファイルを アセンブルした 結果， どれ も 正常に アセンブルを 終了し ました。 と 
ころが， 実行して みると， どうも 不具合が あるよう です。 どうやら， B の 分担して いる 機能 
の あたりに バグが 潜んで いるら しいと 見当を つけ， ェディタで チェックして みると， 案の定， 
些細な ミスを 発見で きました。 修正 後， 内容が 更新され たので B だけを アセンブルし， リン 
ク すると， 今度は きちんと 動きました。 

さて， いまの 例は 非常にかん たんな 例で あり， 2 度 目の アセンブル のとき， どの ファイル 
を アセンブルし たらよ いかは 誰でも わかります。 しかし， ファイルが 5 個 も 6 個 も あり， ま 
た， 一度に いくつもの ファイルを 修正した 場合な どは どうで しよう？ それが 何度も 繰り返さ 
れた 場合は なおさ ら です。 どの フ ァイ ルを 再 アセンブルし たらよ いかがす ぐに わか ります か？ 
ディスクには フ ァイ ルが 作成/更新 さ れた日 付が 記録 さ れ ています。 ア セン ブルし た 結果 得 
られる オブジェクト ファイルの 日付より， ソースファイルの 日付の ほうが 新しければ， その 
ソースは 再 アセンブル する 必要が ある と 判断で き るは ずです。 人間が これを いちいち チェ ッ 
ク して， 手で アセンブルの 指示を 入力しても よいので すが， それは 合理的ではありません。 そ 
こで， それを 代行して くれる ユーティリティ， make の 登場です。 

make が 起動され ると， とくに 指示がない かぎり， makefile という ファイルを 探します。 
makefile は テキス トフ ァイ ルで あり， make が 行 うべき 仕事の 指示が 書かれて います 。 make 
は その 指示に したがって， ファイルの 日付を チェックし， 必要な 処理を 施します。 この 「必 
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要な 処理」 として アセンブルを 指定して ぉけば， 自動的に ファイルの 再 アセンブルを 行って 
く れる わけです。 

makefile の もっと も 基本的な 書き方は， 以下のと ぉりです。 

く ターゲット ファイル 名〉： く 比較 ファイル 名 1 > く 比較 ファイル 名 2〉… 

< コマンド > 

< ター ゲッ トフ ァイ ル 名〉 は， 一般にく コマンド > によって 作成され るフ ァイ ルの 名前で 
す。 く 比較 ファイル 名〉 たちを， く コマンド〉 によって 加工す る ことにより， く ターゲット 
ファイル 名〉 が 作成され ると 考えれば よいと 思います。 そして， く ターゲット ファイル 名〉 
の 日付よりも 新しい ものが， く 比較 ファイル 名〉 群の 中に 1 つで も あった 場合， く コマンド 
> が 実行され ます。 逆に， く ターゲット ファイル 名〉 の 日付が， く 比較 ファイル 名〉 群の 中 
のどれ より も 新しかった 場合は 何も しません。 

先 ほどの 例で したら， A . s という ファイルから A . o ， B . S という ファイルから B . o ， 〇 . s と 
いう ファイルから C . o が 作成され るので すから， 


A.o : 

A.s 



AS A 

— ここは かならず 1 行 空けます 

B.o : 

B.s 



AS B 

— ここは かならず 1 行 空けます 

C.o : 

C.s 



AS C 



と 書いて おけば， 正し く 再 アセンブルが 行われる ことにな り ま t 。 

さらに， 実行 ファイルの 生成まで も make に 行わせる ことができます。 A . o ， B . o ， C . o を 
リンクして ABC . X をつ く れ ばよ いのです から， 

ABC.X : A.o B.o C.o 

LK -OABC ABC 

とすれば よいので す。 

なお， 最終的に 得たい ファイルを 最初に 書く のが 普通です から， ABC . X に関する 記述は， 
ほかの フ ァイ ルに 関する 記述の 前に 置きます。 

このように makefile を 書いて お くこと によって， 一連の アセンブル/ リ ンク 作業は 


A > make 3 


と 入力す る だけです ベて 自動で 行われて しまいます。 

このように 便利な make は， C コンパイラ Ver 么〇に 付属して きます。 さらに 高機能な 
make と しては， おなじみ GNU プ ロジェ ク トの GNUmake が 移植され ています。 各ネッ トの 
フリー ソフ ト ウェアの コーナーで 入手で きる と 思います ので， ぜひ 使わせても らいましょう。 
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1 4 1 実行と デバッグ 


サンプル プログラム MyCLOCK は 完成し ました。 しかし， プログラムに バグは つきもの 
です。 SX - WINDOW で アプリケーションを 起動させる のはかん たんです が， SX - 
SHELL の 上の タスクと して 動作す るた め， デバッグが 非常に 難しい 問題と なります。 こ 
こでは， 前著 『 SX - WINDOW 〜』 でも 多少 触れた， SX - WINDOW アプリケーションの 
デバ ッ グを 解説して いきま しよ ラ。 

SX - WIND 〇 W で ファイルを 起動す るのは かんたんです。 ウィンドウを 開いて， アイコン 
を ダブル クリック すれば よい のです から。 こ の 場合， 私たち の 時計は シエ ル 上で 動 {乍す る こと 
になり， ほかの タスクと 同時に 時を 刻みます （図 1)。 

■図 1 シヱ ル 上で 動作 させた 場合 



12:02:36 

A S fl 


S 5 ^ 

MlCtodc.S SKOU.¥K Wodk.o 

% d 

SKara.o iyClodr.x 


もう 1 つの 起動 方法と して， コマンド ライン 上から 直接 実行 ファイルを 起動す る ことが 考 
えられます 0 私たちの 時 _ tr 、 用いた スケルトンは， 外部 カーネル SXKERNEL . X を 呼び出 
している ので， SXKERNEL . X の 境 下で 動作し ます。 SXKERNEL . X 上では， 私たち 
の 時計 だけが す る ことになります* 1 (図 幻。 

*丨： 正確には， 外部 力ー ネルと 私たちの 時計， 計 2 つの タスクが 動作して います。 


■図 2 外部 カーネル 上で 動作 させた 場合 
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m：， 2 つの 方法の どちらで も けっこうで すから， 瞒 十を 立ち上げて みて 正常に 動作して ぃ 
る 力、 どうかを? 鶴 忍して くた^ぃ。 

私たち の 時計の 場合， 正常に 動作 してぃる かどう かを 確認す る こと は 上 W 効 勺 容易です。 チ ェッ 
ク すべき おもな 事 を 箇条書きに してみ ましよう。 

1) 起動し， エラーが 発生す る ことなく IW 乍す るか どうか 
Z ) 正い、 時刻が， 正しく 表示され てぃる かどう か 

3) 1 秒 おき に 時刻の 書 き 換え が 行われて ぃるか どうか 

4) コントロール 類が 正しく 動作す るか どうか 

ほかに も 細々 とした チェック ポイントは ぃくらでもあります が， きりがなぃ ので， この 程度 
に!： どめ て おきます。 

まず 最初の 問題は， 1) の 「起動し， 動作す るか どうか」 です 0 プログラム 内で* 2 アドレス 
エラー， バス エラー 等の 致命的な エラー （= システム エラー） が 発生した 場合， 図 3 のよう 
な ダイアログが 表示され る ことがあります。 致: 命 的な だけに， この 障害が もっとも 原因を 特定 
しやす く， デバッグ も 上 14 如 勺 容易で あると もぃ えます 0 

*2: この プログラムが SX-SYSTEM, シェル， ほかの タスクに 悪影響を 及ぼした 場合， 致命的な エラー 
が ほかの タスク 内で 発生す る 場合が あります。 

■図 3 システム エラー 


生し ました 

0C) 




デバッグを 行う には， そのための ツールが 用意で きる と 好都合です 0 必要な 順に 並べて みま 

to 

⑴ デバッガ 

『Oh!X』 誌’ 90 年 1 月 号の 付録 デイ スクに 収められ ていた DB.X バージョン 2.10 が 用 
意で きれば 適 想 的です が， それ 以前の バージョン でも けっこうです 0 パ、ー ジョン 2.10 以前の 
DB.X の 場合は， パッチを あてて 使用し ます。 この ハ 0 ッチに よって， デ イス アセンブル 表示 
時に SX コール 名の 表示 こそでき ない ものの， SX コールの トレース や ステップ 実行は， ほ 
ぼ 110 と 同様に 行える ようになります。 104 ページに， 前著 『SX-WINDOW~』 の コラ 
ムに 示した ハ。 ッ チ If 報を _ します ので 参照して くだ、 さい 0 
C コンパイラ バージョン £ に 付属す る SCD.X は， 画面の 使用 状況の 関係で SX アプリ 
ケー ション の デバ、 ッ グに は 不向き です。 
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⑵ デバ、 ツグ 用 カーネル SXWDB.X 

デバッガを 使って 夕 ーゲッ トの プログラムの デバ、 ッグを 行う 場合， 通常は ター ゲッ トの プロ 
グラム だけで， ほかの タスク カす 動作して いない _下 で 行う ことになります。 

外部 カーネル SXKERNEL . X のか わり に デバッグ 用 力ー ネル SXWDB . X を 呼び出す 
ことにより， シェル 上で している のと 同様な _ で， ターゲットの プログラムを 動作 させ 
る こと 力 5 ' できます。 

SXWDB . X は 本書 付録 ディ スタ， ま たは 『〇 h ! X 』 誌’ 90 年 1 月 号の 付録 ディスク に収 
めら れ ています* 3 。 

*3: じつを いうと， SXWDB.X は SXWIN.X とまった く 同じ ものです。 同じ プログラムでは あります が， 
SXWDB.X という 名前で 実行され る ことによって， 動作が 変化し ます。 したがって， SXWDB.X を お 
持ちで ない 方は SXWIN.X を 複写して， 名前を SXWDB.X と 変更す る ことによって， 手に入れる こと 
がで きます。 

(3) コンピュータを も う 1 台 

SX アプリケーションを 動作させる X 68000 と RS -232 C ポート どう しを リバース ケー 
ブルで 接続で きる コンピュータ （ターミナルと 呼ぶ ことにします） を 1 台 用意で きる と， デ 
バッグは さらに 容易になります。 コンピュータで なくても， 通信 機能を 備えた ワープロ でも， 
もちろん けっこうです。 

デバッガは 標準出力に 表示を 行い， 標準入力から コマンド 等を 入力し ます。 SX-WINDOW 
上では， 標準出力を 利用す ると， SX - WINDOW の 画面が 乱れて しまいます。 また， 普通の 
状態では， 標準入力 として キーボードを 利用す る ことは できません。 DB . X を / r オプション 
付きで 起動す る ことにより， 標準出力， 標準入力は， それぞれ AUX 出力， AUX 出力へ と 
リダイレクトされ ます* 4 〇 これに よって， 画面を 刮 / T こ ともなく， ターミナル 側の コン ソー 
ルを 利用して デバッガを 操作す る こ と力呵 能に な ります。 

*4： 標準の 状態では， AUX 入出力と しては RS-232C の 入出力 が 割 り 当てられて います。 

•こうした ツール 類がなくても デバ ッ グが 可能で あ る ことは いうまで もありません が， 最低限 
デバッガは 用意したい ところです。 

各 ツールを 利用した デバッグの 方法を 説明す る 前に， 基本と なる デバッグの 方針を 定めて お 
くこと にし ましよう。 SX アプリケーションに かぎった 話で' はなく， ほとんど すべての 環境 下 
での プログラミングに 共通した 話です から， ベテランの 方には 釈迦に 説法 かも しれません。 

デバッグの 第 1 歩は， 自分の， あるいは 他人の つくった プログラムの 理の 内容を 把握し 
て， まず 大 元の アル ゴリ ズム にお かしな ところがな いかどう かを 判断す る こ とから 始ま ります 0 
この 段階で 不具合が 発見で きた 場合は， プログラムを 根本から 書き直す はめになります。 きち 
んと 設計す る ことを 怠った 報い， といえ なく もありません。 

アル ゴリ ズム に 問題が な さそう だと 判断で きたと こ ろで， おもむろに ソース リスト を 呼び出 
し， チェックを 始めます* 5 。 ここで ありがちな のが， タイプ ミス 等の 初歩 的な 間違いです。 目 
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で 見て 修正で きる ところは 修正して， 再 アセンブル/コンパイルした 結果， まだ 不具合が ある 
場合， ここでよ うやく ツール 類の 登場 となります 0 

*5: この 段階で プリンタに ソースを 出力して しまう 人 もい ますが， 資源 保護の 観点からは， おすすめ 
できる ことではありません。 えてして， この種の プリン ト アウ トは 2 時間 後には くずかご 行きの 
運命に あります。 


ツールを 利用し ない デバッグ 


デバッガな どの ツールを いっさい 用いる こ となく デバ' ッグを 行う こ とは， もちろん 可能です。 
ことに SX - WINDOW の 場合は， デバッグ が 完備され ている とはいい がたい 現^な ので， 
ツールに 頼らずに デバ、 ッグ せざるをえない 状況に 陥る こと もない とはいえ ません* * 6 〇 


* 6: エク セプシ ヨン マネージャを 利用した プログラムな どは， デバ ッ ガ による デバ ッ グが 難し い ケー 
スの I つです。 


デバ ッ ガを 利用す る おもな 目的は， 次の 2 点に 絞られる と 思われます。 

•正い 、丨丨 頃 序で 处理が 行われて ぃるか どう 力、 確かめる 

•正い 、結果， あるぃ は 途中 経過が 得 られ てぃる かどう か 確かめる 

デバッガを 利用せ ずに これらの 目的を 達する 方法と しては， プログラムの 状態を なんらかの 
かたちで ユーザに 示す ための コードを 埋め こむ しかありません。 よく C や BASIC のプ ログ 
ラムで 「怪しぃ」 変数の 内容を 表示 させたり， どこまで％ 理が 進んだ かを 示す 文字列を 表示 さ 
せたり します 力 ? ， SX アプリケーション でも 同様な 手を 使おう とぃう わけです。 

SX アプリケーションの 場合， 問題になる のは， どこに， どのように 表示す るか， です。 と 
り あえず， 2 つの ケースが 考えられます。 

• Human の 標準出力 を 利用す る 

前に 少し 触れました が， Human の 標準出力へ 表示を 行った 場合， SX - WINDOW の 画面 
が 乱れて しまぃます。 ほとんどの 場合， にはと くに 影# がなぃ ので， あくまでも 美意識 や 
見やす さの 問題です が， この 方法の 利点は， とにかく かんたんで あると ぃう ことです。 

プログラムの 適当な 場所に， 適当な 文字列を 与えて， DOS コールの — PRINT を 呼ぶ だけ 
でよ ぃのです から， ほとんど 何も 考えずに すむ ため， タイピングの 手間 だけで あると ぃっても 
ぃぃ でしょう。 

次の ような ケースで， その 使い方と 効果を 示す こ とに します。 
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実行 例 1 


時報 設定の チェック ボックスを クリック すると， システム エラーが' 発生して しまう。 ほかの 
コント ロールの 場合は 問題がない 

この場合， もっと も 怪しい のは レフ ト ダウン イベントの 終理 ルーチン 内で ある こ とはす ぐに 
わか ります。 チェ ッ ク ボックス に 関係す る 部分に 注目 します。 

まず， $ A 3 A 3 __ SXCallGtrlM 力す 正常に 処理を 終了して いるか どうかを チェック しま 
す。 コントロールを オープン する 際に， 異常な 引数を 指定した 場合な ど ， __SXCallCtrlM 
内で エラーが 発生す る ことがあります。 そこで， MyClock . S の 96 行 目から， 次の ような 
コードを 挿入し ます。 

pea 
dc.w 
adda.l 


DBmsg 丄 (pc) 

$ff09 * print 

#4,sp 


DBmsgl は 固定 データ 領域に 置き ます。 


DBmsgl : 

dc.b ’ SXCallCtrlM finished. ’,0 

文字列の 末尾に 改行 ( CRLF ) を 付加し なかった のは， スクロールを 発生 させない ように 
する ためです。 文字列を 表示した だけなら， その 文字列の 範囲の 画面が 乱れる だけです みます 
が， ス クロ ールが 発生す ると 画面 全体が 乱れて しまいます。 

この コードに よって， __ SXCallCtrlM が 正常に 終了して いる 場合は， 画面の どこか* 7 
に _ _SXCallCtrlM finished の 文字列が 表示され る こと になり ます。 すなわち， これは， 
ここまで フ 。ログ' ラム カ ? まがりなりにも 実行され た， という ことを 意味して います。 

* 7 : MyClock.x, あるいは SX シェルを 起動 した 際の プロンプト の 位置 によって， どこに 表示 される かが 
決ま ります。 

次に チェック ボックス に 関係 している コードは， チェック ボックス レコ ー ドへの ハンドルを 
収めて いる chkBoxHdl ( a 5) を 参照して いる 97 行 目の cmp 命令です が， 「チェック ボッ 
クスでの」 ェラーが 発生して いる 情況から 考えて， ここでの 判定は 正常に 行われて いる ことが 
考えられます。 したがって， エラーが 発生して いると すると， 105 行 目からの MSLD _ 
ChkBox 以降と いう ことになります。 ここ では， システム エラ ーが 発生 している ことから， 109 
行 目で 異常な アドレスに アクセス している こ とを 疑って みる こ とに します 。 jihou ( a 5) の 意 
味す る アドレスを 16 進の 文字列で 標示して みる こ とに して， 109 行 目から 次の ような コー 
ドを 書き加える こ とに します。 
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move.l 

dO .-( sp ) 

* DO の 内容を 保存 

lea 

jihou ( a 5), a 0 


move.l 

aO , dO 


lea 

strBuf ( pc), aO 


dc.w 

$ fel 3 

* __ HTOS : DO の 内容を 1 



列に 

pea 

strBuf ( pc ) 


dc.w 

$ ff 09 

氺 print 

addq.l 

#4 ,sp 


move.l 

( sp)+,dO 

* DO の 内容を 復帰 


strBuf は 静的な ワークの 領域に 置きます* 8 。 

*8: ワーク エリア 等に 置いても かまいませんが， 一時的な 処置で も ある ことです から， ここでは もつ 
と も 簡便な 方法を と る ことにしました。 


strBuf : 

ds.b 10 *丨0 バイ ト あれば 十分？ 

以」: のように コードを 追加して， 再 アセンブル/リンクし， シェル 上， または 直接 コマンド 
ライ ン から 実 If します。 

正常な 状態で あれば， チェック ボックスを クリックした 場合， まず __SXCall CtrlM 
finished の 文字列が 画面を 乱しつつ， どこかに 表示され 次いで jihou ( a 5) の アドレス 
を 意味す る 16 進 文字列が^: される はずです （図 4)。 

■図 4 標準出力への 文字列 表示の 結果 例 



XCal lCirlh f lmshed. 114E51 


この どちら か， あるいは 両方が 表示され ない 場合は， それぞれの 箇所を 実行す る 前に シス テ 
ム エラーが 発生して いる という こ とを 動 未して います 力、 ら， ソースの 該当する 部分を 重点的に 
チェック します。 また， 表示され る jihou ( a 5) の アドレスが 奇数 アドレス だったり， メモ 
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4 実行と デ 八 ツグ 


リ の 存在 しない アド レ スだっ たりす るか どう かを 調べ る ことで， バグの 原因 を 突き止める 手が 
かりとなります。 

両方が*^ され， さらに アドレス も 正しい のに， それでも システム エラーが 発生す る 場合は， 
別の 場所に 原因が ある ことが 考えられます。 この場合は， ほかに 怪しい 場所を 求めて， そこで 
同様に 文字列の 表^を 行って， バグの 存在す る 箇所を 特定して いく ことになります。 


• SX-SYSTEM を 利用す る 

同様の 方法を， グラフィック マネージャ 等を 利用して 行う こと もで きます。 この場合， 画面 
こそ 乱れません が， 標示を 行う グラフ ポートを 指定す るな どの 手間が 必要と なり， 若干 面倒で 
はあります。 デバッグ 用の 一時的な コードに 手間を かけたくない のが 人情です から， このよう 
にして 文字列 等を 表示す るのは あま りお も しろくありません。 

実用的 （与かん たん） なと ころでは， ダイアログ マネージャの $ A £ D 7 DMBeep 等を 利 
用して， 「处理 を ここまで 実行す る こと 力 5 ' できた」 ことを 示す 合図と して ビープ 音を 鳴らす と 
いう こと 力 5 ' 考えられます。 


□ B . X バージ ヨン 1.10 を 利用す る デバッグ 


デバッグ 用の コードを 直接 埋め込む 方法には 若干の 問題点が ある ことは すぐに 気がつき ま 
す。 たとえば， 怪しい 場所が ある©^ 特定で きているなら ともかく， そうでない場合は チェ ッ 
ク する 場所を 変更す るた びに ソースを 書き換えて 再 アセンブル/コンパイルし なければ なり ま 
せん。 埋め込んだ コードに よって 知る ことができる 以上の 情報を 得たい 場合 も 同様で， いちい 
ち ソースに 必要な コードを 付け加えなければ なりません。 要するに， デバッグ f 恃 I の 自由度が 
低い こ とが 問題と いえます。 

Human では， デ' バ 、ッカ、、 （ DB . X ， SCD . X 等） を 使って ターゲット となる プ ログ、 ラムを 監 

視 下に 置く ことにより， 任意の アドレスで 実行を 停止 させたり， レジスタ や メモリの 内容を 參 

照/変更 したりと いった デバッグ f 樣が 行える のは ご存知の とおり です。 ターゲットが SX ア 

プリ ケーシ ョンの 場合 も， いくつかの 制限 力す つく ことを 除けば， ほぼ 同様に デバッグ 作！！ を 行 

うこと がで きます。 本書 執筆 時点では， SX-WINDOW 環境で 動作す る デバッガは 存在し な 

いので， 制限は ある ものの， Human の デバッガを 工夫して 利用す る こ とに よって， SX アプ 

リ ケー シ ョンの デ' パ、 ッグ、 を うこ とに なり ます。 

本書では デバッガと して DB * X を 利用す る こ とに します が， そのほかの デ パ' ッガ （ GDB . 

X * 9 等） も 利用 可能です。 ただし， SCD.X は 画面 全体を 破壊して し まう ので 利用で き ません。 

*9: GNU デバッガ。 GNU プ ロジェ ク トに よって 開発され た デバッガで ， NIFTY Serve FSHARP の 今 野 
氏に よって X 68000 に 移植され ている。 


以下に DB.X を 使って SX アプリ ケー シ ヨンの デバッグを 行う 際の 制限を 示します。 
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第 1 章 プログラミングの 補足説明 


• マルチ タスクを 前提と した プログラムは テ ッグで きない 
DB.X は， もともと Human 上で 動作す る プログラム を デバ、 ッグす る ことを 目的と してつ 
くられて います。 そのため， 原則として 1 つの プログラム （タスク） だけが 動作して いる 状 
態で し か デバ ッ グを行 うこと がで きま せん。 

たとえば， 2 つの タスクが 連絡を 取り あって 動作したり* 10 ， シェル 上で 動作し なければ 意 
味がなかったり する* 11 ような SX アプリ ケー シ ョンの デ パ、 ッグは でき ない と 考えて く ださ 

い 0 

*10: ただし， 通信 相手の タスクを 自分で 起動す るよう な SX アプリケーション ならば， ある 程度 動作 
の 確認は 可能です。 

* 丨 丨 ： 例と しては， ファイルの アイコ ンが ドラッグされ てく る ことによって 動作す るよう な プログラム 
や， タスク マネー ジャス クラ ッ プの 内容を 參 照/操作す るよう な プロ グラムな どが 考え られ ます。 

こうした 点に ついては， デバッグ 用の コードを 埋め込む 方法の ほうが 有利です。 なにしろ， 
SX アプリケーション そのもの である わけです から， SX シェルと いう itlt 下で， そのまま 起 
動し， 利用す る ことができる からです。 

この 制限は， SXWDB.X を 利用す る ことによって， ある f 呈度 緩和され ます。 

• 画® を 石 座 壊して しまう 

DB.X の 表示は 標準出力に 行われます。 すでに 述べた ように， 標準出力に 文字を 出力す る 
と， SX-WINDOW の 画面は 乱れて しまいます。 とくに ス クロ ー ルが 発生す ると， 画面 全体: 
が刮 ix てし まう ことになります。 

また， DB.X の コマンド 等は 標準入力から 受け付けて いますが， SX-WINDOW では キー 
ボー ド マネージャの 関係で 標準入力は 使用で き ない 状態が 普通です。 デバッガに コマンドを 与 
える 場合は， 一度， [ CTRL ] + [ OPT . l ] + [ F 10] を 押す こ！: で， OldOn を 1 にして 
ぉく 必要が' あります。 

この 制限は， ターミナルを 用意す る ことによって 回避す る ことが' できます。 

それでは， こう した 制限の 下で デバ' ッグを 使って みま しょう。 


実行 例 


ウィンドウ レコー ドの 内容が’ どのよう に変イ 匕す るか 調べて みたい 0 

My 〇 lock . x は， すでに 作成して ある ものと します。 リンクの 際， リンカに / x オプション 
を 指定せ ず， グローバル シンボルを 残して おくと， プログラム 内部を 探索す る 助けになります 0 
まずは， デ' バ 'ツカ'' を 起動し まず。 


A>DB MyClock.x 
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4 実行と デバッグ 


デバッガの 起動と， MyClock . x の 読み込みが 正常に 行われた 場合は， 次のように 表示 さ 
れ， デバッガの コマンド 侍ち となります。 


X68k Debugger v2. 10 Copyright 1987. 88. 89 SHARP/Hudson 
loading MyCI ock. x 

PC=000FEF00 USP=000DD624 SSP=000067F2 SR=0000 X:0 N: 0 2:0 V: 0 C:0 

D 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 
A 000FEDE0 000 FF590 000 DDFB4 0005 CFG0 000 FEF00 00000000 00000000 000 DD624 
lea $0040 (AI) r A1 ; 000FF5D0 (1 4) 


(各 レジスタの 内容は， 起 DrT る 際の 環境に よって 異なります) 


ウイン ドウを 開いた 直後に ブレーク ポイント を イ士 桂 卜け， そ こで ウイン ドウ レコー ドへの ボイ 
ンタを 調べる ことにします。 ウイン ドウを 開いて いるのは 初期 イレ レー チン _ INIT の 中です か 
ら， シンボル INIT からを デ イス アセンブル 表示して， 目的の 場所を 探します。 


-1. INIT 



INIT: 

000FF14C 

move. 1 

$0008 (A5), DO 

000FF150 

move, w 

$0010(A5) f D1 

000FF154 

btst. 1 

H$0000, D1 

000FF158 

beq. s 

S000FF174 

000FF15A 

move. 1 

$0000 (A5) ， D1 

000FF15E 

beq. s 

J000FF17A 

000 FF160 

tst. w 

01 

000 FF162 

cmp. w 

DO, D1 

- 1 

. | 

( 何度か 繰り返して） 

000 FF1D0 

move, w 

i$FFFF, -(A7) 

000FF1D4 

move. 1 

HSFFFPFFFF, -(A7) 

000 FF1DA 

move, w 

H$ 0200 • -(A7) 

000FF1DE 

move, w 

K$FFFF, -(A7) 

000FF1E2 

pea 

$01DA(PC) 

000FF1E6 

pea 

$0008 (A5) 

000FF1EA 

pea 

$002A(A5) 

000FFIEE 

— WMOPE 丨 

'J —Ver2. 彳〇 以前では " dc.w $A1 F9” と 表示され ます 

一 | 

000FF1F0 

lea 

$001A(A7), A7 

000 FF1F4 

tst. 1 

DO 

000FF1F6 

bmi. w 

$000FF294 

000FFIFA 

St 

$009C(A5) 

000 FF1FE 

c 1 r. 1 

$00AC(A5) 

000 FF202 

clr. 1 

-(A7) 

000 FF204 

move, w 

#$0020, -(A7) 

000 FF208 

move, w 

#$0001, -(A7) 


ウインドウ レコー ドア ドレスは， $ A 1 F 9 WMOpen の 返り 値と して AO に 収められ てい 
ます。 そこで， WMOpen から 戻って きた 直後に ブレーク ポイントを 仕掛ける ことにします。 
ただし， SX コールの 直後の 命令は トレース できない 場合が あるので， さらに 次の 命令， 例に 
示した 場合では， FF 1 F 4 に ブレーク ポイントを 設定し ます 0 


-b FF 1 P 4 
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第 1 章 プログラミングの 補足説明 

この 後， G コマンドで MyClock.x の 実行が 開始され ます。 デバッガから 立ち上げた 場合， 
コマンド ライ ン から 立ち上げ たのと 同じ こ とに なり ますから， 処理が 始ま るのは ラベル 
DiXstart からです。 外部 カーネルが 起動され， 最小限の 初期化が 行われた 後， MyClock 
本来の 処理が 始まり ます。 

普通な らば， このまま 時を 刻む とこ ろです が， 先 ほ ど 設定し た ブレーク ポイント のた めに ウイ 
ン ドウを 開いた 直後に 停止し ます。 ブレーク ポイントに 達して 理が 中断され た 場合は， その 
時点での レジスタの 内容 等が 標準出力に 表示され るた め， 図 5 に 示した よう に 画面が 乱れて 
しまいます。 

■図 5 デバッグ 中の 画面の 例 （1) 



画面の 乱れは 実行には 直接 影® しないので， あま り 気にせずに f 樣を 続ける ことにします。 

ここで 、表示され ている レジスタの 内容のう ち， A0 レジスタが ウインドウ レコードの 先頭 ア 
ドレスを 意味して いるので， メモ 等に 言 ei 录 して おきます 0 

中断して いる 处理 を 継; 続させる ために， G コマンドを 入力したい ところで すが， このまま 
では キー入力が できません。 [CTRL] + [OPT.l] + [F10] を 押して， 標準入力を 有効 
にしてから， G コマンドを 入力して ください。 

この 後， ウィンドウ レコードの 内容を 確認したい 場合は， インタラプト スイッチで 处理を 中 
断 させて， D コマンド 等を 使います。 D コマンドの 表示な どで スクロール アップが 発生す る 
と， テキスト VRAM の# 0， 1 ページ だけが スクロール アップして しまうた め， ウィンドウ 
等 も スクロール アップして しまうよ うに 見えます が， 実際の 位置は 変イ 匕して いません。 ウィン 
ドウ カ ? 見えな く なって しまっても， ウィン ドウの ドラッグ リージョンの あたり を マウスで ク 
リックす る ことで 等 & 郭が 忍で きます から， 一度 画面の 外に ドラッグ する 等して， アップ デ ー 
卜 を 発生 させれば ふたたび 表示され ます。 

处理を 終える 場合は， かならず ウィンドウの クローズ ボタンを 押して 終了 处理 を 行わせて か 
ら， デバッガの Q コマンドで コマンド ラインに 戻って ください。 中断した 状態から いきなり 
Q コマンドで 終了す ると， SX-SYSTEM の 終了 処理が 行われて いないため， いろいろと 不 
都合が 発生し ます。 
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4 実行と デバッグ 


SXWDB . X を 利用す る デバッグ 


SXWDB.X は SXKERNEL.X と同樣 外部 カーネルの 一種で， デバッグに 直接的に 関 
係す る ものではありません。 が， DB.X 等と 組み合わせる ことによって， SX アプリ ケ ーショ 
ンを シェル 上に 近い 環境で 動作 させながら デバッグを 行う こ とがで きる ようになり ます。 

SXWDB.X の 利用 方法は， SXKERNEL.X と同樣 つまり， コマンド ラインから 立ち 
上げられた 場合に， まず SXWDB.X を 起動し， SXWDB に ターゲットの 起動を ゆだねる， 
という ものです。 このためには， スケルトンを 差し替えて， 再 アセンブル/リンク する 必要が 
あります 0 差し替えるべき テ、、 パ、 ツグ 用 スケルトン SKELDB.S を リスト 1 に 示します。 


■リスト 1 SKELDB.S 


1 * 

2 * 

SX-WINDOW 



3 本 

4 * 

デバ ッ 

グ用 スケルトン 



5 

6 

.include DOSCALL. MAC 



7 

Q 

. include SXCALL.MAC 



0 

9 

. xr ef 

INIT, TINI 



10 

. xref 

IDLE 



11 

. xref 

MSI DOWN, MSLUP, MSRDOWN, MSRUP 

12 

.xref 

KEYDOWN, KEYUP 



13 

. xref 

UPDATE, ACTIVATE 



14 

1 C 

. xref 

SYSTEM!, SYSTEM2, SYSTEM3, SYSTEM4 

10 

16 

• include WORK. INC 

本 

ワーク エリ アの 内容 

17 



本 

を 定義す る ファイル 

If 

18 

. text 




19 mdhead : 




[ モジ: L ー ル ヘッダ 1 

20 

dc. 1 

. OBJR, 

t 

R 型 モジュール 

21 

dc. 1 

0 

本 

プ ログ ラ厶 エリ アの 




* 

サイズ 〇( ファイルの 




本 

場合 意味がない） 

22 

dc. 1 

ma in-mdhead 

本 

スター トア ドレス オフ*! 

23 

dc. 1 

WORKSIZE+STKSIZE 

本 

ワーク エリ アの サイズ 

24 

dc. 1 

0, 0, 0, 0 

本 

システム 予約 

25 





26 DiXstart : 



本 

コマンド ライ ン から 




* 

起動した 場合 

27 



* 

ここから スター トする 

28 

lea 

64(a1),a1 



29 

move. 1 

al, sp 



30 

lea 

16(a0), aO 



31 

sub. 1 

a0, al 



32 

move. 1 

al, - (sp) 



33 

pea 

(a0) 



34 

DOS 

_SETBL0CK 

本 

専有 メモリを 縮小す る 

35 





36 

c 1 r. 1 

- (sp) 



37 

pea 

comm (pc) 



38 

pea 

shname (pc) 



39 

move, w 

#2, - (sp) 



40 

DOS 

_EXEC 

本 

デ バック 用 力 ー ネルの 




本 

パスを サーチす る 
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-(sp) 
comm (pc) 
shname (pc) 
- (sp) 

EXEC 


dO 

p_execi I 

mes_execerr (pc) 
PRINT 


EXIT 


* デノ く ッグ用 力 _ ネルを 
* 立ち上げる 

* 正常に 終了した 場合 
* そのまま 終了 

t エラー メッセ ー ジを 
* 表示す る 

* 終了 


カーネルの 起動に 失敗し ました！！ ド， 丨 3, 10,0 


， sxwdb. x -D -K -L0，，0 t デバッグ 用 力ー ネルの 名前 
70 


ds. b 258 


• text 


movea. I al ， a5 

move. I a2, cmdL i ne (a5) 

move. I a3, envPtr (a5) 

clr.w - (sp) 

cl r. I - (sp) 

pea. I winRect (a5) 

pea. I (a2) 

SXCALL $A3EA 
lea. I 14 (sp) , sp 

move, w dO, paramF I g (a5) 

bs r _l N I T 

bmi _ex i t 

move, w |t$f f f f, eventMask (a5) 

pea eventRec (a5) 

move, w eventMask (a5) , - (sp) 

SXCALL $A357 

addq. I #6, sp 

lea eventTab I e (pc) ， al 

move, w eventRec_what (a5) , dO 

and. w HI 5, dO 

add. w dO, dO 

move, w (al, dO. w) • dO 

j sr (al, dO. w) 

tst. I dO 

bmi _exit 

bra I oop 


* カーネルは ここから 
t 矣のコ _ ドを 読み込み、 

* タスクと して 立ち上げる 

本 SX — SHELL から 
* 起動した 場合 
* ここから スター トする 


t TSTakeParam 
* □ マンドラ インを 解析し 、 • 1 
* オ プショ ンを 得る 

* アプリケーションの 初期化 
* 初期化 時に 
* エラー が あれば 終了 


* メイ ンル ープ 


t _ TSEventAva i I 
* イベント を 得る 


t イ ベン ト コー ドに よって 
* 分岐す る 


41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 p exec 1 1 : 

53 

54 

55 

56 mes execerr : 

57 

58 

59 shname : 

60 
61 
62 

63 

64 

6d comm : 

66 

67 

68 

69 

70 一 main: 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 loop: 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 


r 3 3 r 
I 8 8 I 


o 


s p e o o d 
t b PD D • 


c s 
d d 


100 


4 実行と デバッグ 


101 

102 

103 

104 

105 

106 

107 

108 
109 


eventTab I e 


120 DAMMY: 

121 
122 

123 一 exi t: 

124 


125 

126 

127 

128 

129 

130 


dc. w 

1 DLE-eventTabl e 

dc. w 

MSLDOWN-eventTable 

dc. w 

MSLUP-eventTab 1 e 

dc. w 

MSRDOWN-eventTable 

dc. w 

MSRUP-eventTab 1 e 

dc. w 

KEYDOWN-eventTable 

dc. w 

KEYUP-eventTable 

dc. w 

UPDATE-eventTabl 6 

dc. w 

DAMMY-eventTab 1 e 

dc. w 

ACT 1 VATE-eventTabl e 

dc. w 

DAMMY-eventTab 1 e 

dc. w 

DAMMY-eventTab 1 e 

dc. w 

SYSTEMI-eventTable 

dc. w 

SYSTEM2-eventTable 

dc. w 

SYSTEM3-eventTable 

dc. w 

SYSTEM4-eventTable 


rts 


bsr 

_TINI 

move, w 

dO, - (sp) 

SXCALL 

$A352 

. end 

DiXstart 


* 分岐 先の テー ブル 

* 0 アイ ドル イベント 

* I レフ ト ダウン イベント 
*2 レフト アップ イベント 
*3 ライ ト ダウン イベント 

* 4 ライ ト アップ イベント 
*4 キー ダウン イベント 

* 6 キー アップ イベント 

t 1 アッ フデ ー ト イベント 
*8 

* 9 アク ティ ベイ ト イベント 

* 10 —— 

* II —— 

* 12 システム イベント 1 
本 13 システム イベント 2 
* 14 システム イベント 3 
t 15 システム イベント 4 


* [ 柊 了す る】 

* アプリ ケー シヨ ンの 
* 終了 処理 


* TSExit 


私たち の 時計の 場合なら ば， 再ア セン ブル/リンク は 次の ように 行う ことになります。 


A>AS SKELDBH 

A > AS MyClock H (すで、 に アセンブル して ある 場合は 不要) 

A>LK -0 MyClock SKELDB MyClock H 


make を 使う 場合は， 次の ような makefile を 書き ます。 


MyClock. X: SKELDB. 0 MyClook. 0 

LK -OMyClock SKELDB MyClock 

SKELDB. 0: SKELDB. S WORK. INC SXCALL. MAC 

AS SKELDB. S 

MyClock. 0: MyCLock. S WORK. INC SXCALL MAC 

AS MyC I ock. S 


このように 作成した 実行 ファイルを， デバッガ によって チェック する 手順は， 先 ほどと 変わ 
りません。 が， 起動した ときの 画面 （図 6) を 見る と， 先 ほどとは 異なり， シェルと ほとんど 
同じで ある ことが わかります。 ディレクトリの ウィンドウを 開いたり， ファイルを 実行で きた 
り， そして， それが マルチ タスクで 動作した りする の も シェル 上と 同じです 0 ただし， ブレー 
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ク ポイントに 到達したり， インタラプト スイッチを 押したり して 处理 を 中断 させた 場合は， す 
ベての タスクは 停止し， デバッガ だけが'®} する 状態に なり ます。 


■図 6 デバッグ 中の 画面の 例 （2) 



デバッガの 表示に よって 画面が 壊れたり， 終了 時に 注意が 必要だった りする 点は， SXWDB. 
X を 使わない 場合と 同様です。 キー入力 に関する 注意は， SXWDB.X に -K オプションを 
つけて 標準入力を 有効に している ため， 必要な く なって います。 


ターミナルを 利用す る デバッグ 


こ れ までの 方法で 問題 だっ たのは， とにかく 画面が 乱れて しまう ことでした。 こ の 問題は， 
ター ミ ナルと な る バソコ ン / ワープロが 用意で き れば 解決で きます 0 
ター ゲッ トの プログラムを 実行す る X68000 と， ターミナルを 接続す る 手順は 以下のと お 
りです 0 


1) X68000 と ター ミ ナルの RS-232G ポートを クロス ケー ブルで 接続す る 
Z ) X68000 側で SPEED.X を 実行 して， ボーレー ト 等を 設定す る 
3) ターミナル 側で 通信 ソフトを 立ち上げ， ボーレート 等を X68000 側と 合わせる 

で 準備は 完了です 0 
•デ' ハへ ソ ガを 利用し なし ヽ 場合 

デバッガな しで デバッグを 行う 場合は， 標準出力に 文字列を 表示す る 等の デバッグ 用の コー 
ド を 埋め込んで 再アセ ン ブル/ コ ンパイ ルし た 後 


A>MyClock>AUXa 


のように， 標準出力を AUX に リダイレクトして 起動し ます。 これに よって， 画面を 乱しつ 
つ 表示され るは ずだった 文字列は， ターミナル 側に 表示され るよう になります。 
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4 実行と デバッグ 


•デバッガを 利用す る 場合 

デバッガを リモート デバッギング モードで 起動す る ことにより， デバッガの 表示 や コマンド 
の 入力 等を 夕ーミ ナル 側で 行え るよう になります。 リモート デバ、 ッギ ング モー ドで デバッガを 
起動す るには， / r オプションを 指' 定 します。 


A>DB /r MyClock.xffl 


SXWDB . X を 併用す る ことによって， 非常に 快適な デバッグが 可能と なります （図 7)。 

■図 7 リ モー ト デバッギング 中 



SX アプリケーションに かぎらず， デバッガの 表示 や キー入力に 問題が あるよう なプ ログ ラ 
ム （ゲーム 等） では， こうした リモート デバッギング はごく 一般的に 使われて いる 方法です 0 
サブ マシンを お持ちの 方は ぜひ お試しく ださい。 


以上に 示した ような 方法を， 場合に応じて 組み合わせて 使い， バグの 原因を 1 つ 1 つ 潰し 
ていきます。 デバッグ 作業の 「地味 さ」 は， Human の プログラムで あろうと， SX アプリ ケー 
シ ョンであろう と 変わる わけではありません。 マルチ タスクで 動作す る デバッガがない という 
の も 痛い ところで すが， ほかの タスクの ことを 考えずに すむ ので， かえって 好都合 かもしれ ま 
せん。 

また， デバッガを 使って SX アプリケーションを 追ってい くこと で， SX - SYSTEM への 
理解を さらに 深める ことができる はずです。 ひととおり バグの 退治が できた 後は， SX - 
WINDOW 内部を^* してみ てはい かがで しよ う 力 1 。 
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COLUMN | □日 X への パッチ 当て 

DB . X には いくつか バージョンが あります が， このうち， もっとも SX - WINDOW 用の ア 
プリ ケー ション 開発に 向いて いるのは バージョン 2.10 です。 『 Oh ! X 』 誌に 付属 してきた 2.10 
では， SX コールが 実行可能で， ディ ス アセンブル 時に SX コール 名まで 表示して く れ ます *〇 
C コ ンパ イラ 2.0 に 付属す る DB . X バージョン £.0 は， SX コール 名の 表示 こ そでき ませ 
ん が， SX コールの 実行は 可能です。 

問題は それ 以前の バージョン， 1.00 と 1.01 で， これらは SX コールを 実行し ようとす る 
と エラーが 発生して しまいます。 これらには， 以下の ように パッチを あてて 使用して くださ 


バージョン 番号 サイズ 日付 時刻 オフセット 旧 データ 新 データ 

1.00 25522 87- M -03 12:00:00 $4 DFE 7008 7007 

1.01 25518 88-05-15 12:00:00 $4 DFA 7008 7007 

* : バージ ヨン 2.10 では SXI .02 までの SX コールの み サボー トされて います。 
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拡張 ざれた マネージャ 


SX - WINDOW バージ ヨン 1.10 を 使って みて 最初に 感じた 
「速さ」 は， 従来から 用意され ていた マネージャの コードを 見 
直し， 全体 的に スピードアップを 図った 結果です。 しかし， 高 
速 化 ばかりで なぐ 機能の 面で も 大幅に 拡張され ています。 こ 
の 章では， とく に 大きな 拡張が 行われた グラフ ィ ック マネー 
ジャ， テキス ト マネージャ， タスク マネージャを 中心に， それ 
それの 新しし ヽ 機能/概念 等を 解説 します。 



SX 1.10 と SX 1.02 を 比較した 場合， すぐに 気がつく のが 全体 的な 描画 スピードの 向上です。 
これは， ウィンドウを はじめ， 画面に 表示され る あらゆる ものを 描画して いる グラフィック 
マネージャが 改善され たのが 大きな 理由です。 ころ いった スピード 的な 改善 もさる ことなが 
ら， 機能的に もさら に 充実して きました。 

[l | スクリーン タイプの 追加 

従^ スクリーン タイプと しては テキス ト タイプと グラフ イ ック タイプの 2 種類が 用意 さ 
れ ていました が， GR 2 タイプ， GR 3 タイプの £ つの スクリーン タイプが 追加され ました。 

GR 2, GR 3 は 垂直 型 （グラ フィ ッ ク 画面 同様に， ドット の 色を 一度に 指定で き る タイプ) 
のビッ ト マップです。 これらに 対応す る ハードウェア 的な デイ ス プレイ 装置は X 68000 には 
備えられて いないので， 表示を 行う 目的では なく， 画像 データを メモリ 中に 記憶して おく 目的 
で 利用され ます。 

GR 2 タイプでは， 1 ドットを 4 ビット， 1 パ、 イトで 2 ドットを 表現し ます 0 したがって， 
16 色まで 表現 可能です 0 

GR 3 タイプでは， 1 ドットを 8 ビット， 1 バイトで 1 ドット， £56 色までを 表現し ます。 
これら 2 つが 追加され たこ とに より， ビッ ト マップの 種類を 示す コードは 次の 表の ように 
_ され ま した。 


コード 

スクリーン タイプ 

0 

テキス ト タイプ 

1 

グラフィック タイプ 

2 

GR 2 タィプ 

3 

GR 3 タイプ 


ただし， $ A 1 £D GMOpenGraph な どでは GR 之 GR 3 タイ プは 指定で きま せん 。 GR 
Z , GR 3 タイプを 指 1 定 できる のは， 次に 解説す る 「ピッツ」 の 作成の 場合の みと 考えて くだ 

さい。 


ビッ ト マップの ノ \： リエ ー シヨ ンの 追加 


従来の ビッ ト マップに 加えて， メモリ 中に 画像 情報を 保存して おくた めの ビッ ト マップの バ 
リエー シ ヨンと して， 「ビ ッツ （ bits )」 と 呼ばれる デー タ 構造が 追加され ています。 ピッツは 
ビッ ト マップ レコー ドと 再! 己 置 可能 ブロックを 結合した ような もので， 再！ 己 置 可能 ブロックの 
中に ビッ ト マップ レコー ドと 画像 情報が 格納され ます （図 1) 0 
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1 グラフ イツ クマ ネー ジヤ 


■図 1 ピッツの 概念 


ヒープ ゾーン 籲ビッ ト マップの 場合 



ビッ ツの 形式は 次の とおり です。 


(I) 

⑵ 

ビット 
マップ 
レコー 
ドと 同 
じ 形式 


⑶ 

⑷ 

⑸ 


* l :「 SX - WINDOW 〜 j では グラフィック タイプの 場合， 丨 ラインの バイ ト 数が ロング ワードで 示される 
ような 記述が ありま したが， それは 誤りでした。 


オフセット 

櫚名 

内 

容 

+ $00 . w 

bmKind 

ビッ ト マップの 種類 


+ $02 

bmRect 

ビッ ト マップ レク タング ル 

+ $0 a.l 

bmBase 

ベース ア ドレス 


+ $0 e.w 

bmLine 

1 ラインの バイ ト 数* 1 


+ $10.1 
+ $ l 4 .w 

bmPage 

bmAPage 

1 ページの バイ ト 数 1 

アクセス ページ 

1 テキス ト タイプの 場合 

+ $ IO.w 

bmBRatio 

プレン ドウ エイ ト レシオ 1 

1 グラフ ィ ック， 

+ $12.1 

- - - 

未使用 

| GR 2, GR 3 タイプの 場合 

+ $16.1 


イメージ サイズ 


+ $ la.w 


ロ ック サイズ 


+ $ 丨 c 


システム 予約 （16 パイ ト） 


+ $2 c 


ビッ ト イメージ 
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(1) ビットマップの ■頁 

ビットマップ レコードと 同じように， ビットマップの 種類が 格納され ています。 ビット マッ 
プ では テキスト タイプ， グラフィック タイ プ のみが 指定 可能です が， ビッ ツ では GR る GR3 
タイプ も t 旨定 する ことができます。 

(2) ベース アドレス 

ビットマップの 場合， テキスト VRAM， あるいは グラフィック VRAM の アドレス カ ? 格 
納 されます が， ピッッでは （5) の ビット イメージの アドレス （つまり， ピッツの オフセット 
+$2c)， もしくは 0 力 すネ 各 M されて います。 

ピッツは 再! 己 置 可能 ブロック 内に あるた め， 通常は ビッ ト イメージの ある アドレスを 確定す 
る ことができません。 そのため， 確定で きない 場合には 0 が 収められ， この間， ピッツに 対 
する 描画な どは 不可能です。 ピッッを 利用す る 場合は， $A1CC GMLockBits を 利用して 
ピッツ 全体を ロックし， 己 置に よる 移動を 禁止し ます。 このと き， ビット イメージの アド レ 
スも 確定で き， ベース アドレスに 格納され ます。 この 状態で， はじめて ビッツ に対して 描画な 
どを 行う こと 力 ? できます。 

(3) イメージ サイズ 

ビット イメージの パ' イ ト 数が 収められて います。 

(4) ロック レベル 

1以」1 が 収められ ている 場合は， ピッツは ロック された 状態で ある ことを， 0 の 場合は ロッ 
ク されて いない ことを 意味して います。 $A1C 〇 GMLockBits, $A1CD GMUnlockBits 
等で 操作され ます。 

(5) ビッ ト イメージ 

ビッ ツの 画像 デ ー タが 収めら れて います。 


ビッ ツの 利用は， 次の よう な 手順で 行います。 

❶ ピッツの 作成 

$A1CA GMNewBits によって， 必要な サイズの ピッツを ヒープ ゾーン 中に 作成し ます。 
このと き， ピッツへの ハンドルが' 返されます。 

この 時点では， ビッツ は ロック されて おらず， また， ビット イメージの 内容 も 初期化 ^ されて 
いません。 

❷ ピッツの ロック 

ピッツに 描画を 行う 場合は， まず ロックを 行わなければ なりません。 ピッツへの ハンドルを 
す旨定 して $A1CC GMLockBits を 呼ぶ こ とに より， ロック カ ? 行われます。 
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❸ 内容の 描画 

ピッツへの 描画は， ビッ ト マップへの 描画と まったく 同様に 行う こ とがで き ます。 ビッ トマ ッ 
プ レコ— ドを 参照して， 直接 ビット イメージを 操作す る こと もで きます が， この ピッツの ため 
の グラフ ポー トを 作成して， グラフ ィ ック マネージャの SX コールを 利用す る ほうがよりか 
ん たんです。 

❹ ピッツの アンロック 

描画が 一段落 したと こ ろで， $ A 1 CD GMUnlockBits を 呼び出して ピッツを アンロック 
します。 ビッツ も 再！ 己 置 可能 ブロックの 一種な ので， 長期に わたって ロックを 行う ことは ヒー 
プ ゾーンの 利用 効率を 低下させる 可能性が あり ます。 

❺ ピッツの 内容の 利用 

ピッツに 描画を 行った 結果を， なんらかの 方法で 利用で きなければ 意味が あり ません。 
ピッツの 内容を 実際に 表示し よう とする 場合， ピッツと ビットマップ 間で スクリーン タイプ 
が 異なる 場合が 考えられます が， このよう な 場合の ために $ A 1 BB GMTransImg のように， 
異なる スクリーン タイプの ビットマップ （ピッツ） 間で， データ 変換を 行いつつ コピーす る 機 
能 等が 用意され ています。 

❻ ピッツの 廃棄 

ピッツ の 利用が すべて 終了 したら， アプリケーション は 責任を もって ビッツ を 廃棄 しな けれ 
ばな りません。 ピッツの 廃棄を 行う 場合は $ A 1 CB GMDisposeBits を 呼び出します。 



グラフィック マネージャの 扱う 図形の _ に， 「円弧 （ arc )」， 「ポリゴン」 の 2 種類が 正式 
に 追加され ま した* 2 。 

*2: SXI .02 でも， いちおうの 描画 ルーチンは 用意され ていた 模様です。 


❶ 円弧 （ arc ) 

円弧は， 楕円の ある 一部分を 切り取った 形です。 円弧の 指定は， レク タング ル， および 開始 
角度， 終了 角度の 3 つで 行われます。 グラフィック マネージャは， 指定され たレク タング ル 
に 内接す る 楕円の， 開始 角度から 終了 角度までの 部分を 描画し ます （110 ページ 図 2)。 
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■図 2 円弧の 指定 


( a ) レク タング ルと 角度の 意味 



このような 円弧は， 
レク タン グル 
( x s ， y s )-、 x e ， y e ) 

と 

開始 角度 $0000 ⑹ 
終了 角度 $13 B (315) 
で 表される 


( b ) 枠を 描画した 場合 



( c ) 内部を 塗り潰した 場合 



❷ ポリゴン 

ポリゴン は 複数の 頂点 を ライ ンで 結んだ， いわゆる 多角形です。 ポリゴン は 頂点を 列挙す る 
こと で 表現 します。 頂点は 列挙 さ れた 順番に ライ ンで 結ばれ， 最後の 頂点と 煙の 頂点と が 結 
ばれた， 閉じ た 図形 となります （111 ページ 図 3)。 

ポリゴン を 表現す る ポリ ゴン レコ ー ドの 形式は 次の とおり です 0 


オフセット 

内 容 

+ $00.1 
+ $04 
+ $0 c.l 

ポリ ゴン レコ ー ドの サイズ 

バウンド レク タン グルを 意味す るレク タン グル 

最初の 頂点を 意味す る ポイント 


ポリ ゴンの 描画には， 枠の 描画と 内部を 塗り 潰しての 描画が ありま すが， 塗り潰 しの 場合， 「内 
部」 の 定義が リージョンの それに 準ずる 点に 注意して ください。 
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■図 3 ポリゴンの 指定 

(a ) 枠を 描画した 場合 



このよ うな ポリ ゴンは 

dc.l 4+8+ (4* 6) 
dc.l x s -ys,x e -ye 

dc.l x 0 y 0 

dc.l x,-y, 

dc.l x 2 -y 2 

dc.l x 3 y 3 

dc.l x 4 y 4 

dc.l x 0 -y 0 


☆ 


[4 了 多様な 画面 モードへの 対応 


SX1.02 は， 基本的に 768X512 ドット の 画面 モー ドで 葡作す る こと 力 5 ' 提 となって おり， 
そ れ 以外の 画面 モー ドの ことは 考えられて いま せんでした。 

SX1.1 〇 では， グラフィック マネージャの 初期化 時に $A1C2 GMInitGrapMode を 呼 
び 出して 画面 モードを 指定す る ことにより， ビッ ト マップの 初期値 等を 画面 モードに 適した 値 
に 変更し ます。 


フォン トの 拡張 


SX1.02 では， 原則として ROM に 格納され ている フォント しか 利用す る こ とがで きず， 
フォン トカイ ン ドと しては ROM 中の 1之 1ら 24： ドッ トフ ォン トを 意味す る 0， L 2 の 
値し か 取り得ませんでした。 

& 張され た グラフィック マネージャでは， 「フ ォン ト リンク」 という デ'— 夕 構造を 使う こと 
によって， ユーザが フォン トを 追加で きる ようになって います。 フ ォン ト 1 種類 ごとに フォ 
ント リンクを 用意し， それへの ポインタを 指定して， $A1E0 GMAddFont を 呼び出す こ 
とに より， SX-SYSTEM に フォントが 追加され ます。 追加され た フォントは， フ ォン トリ 
ンク 中で 宣言 した フォント カ イン ドの 数値: で f ij 用す る こと 力 5 ' できます。 
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(1) 次の フォント リンクへの ポインタ 

システムが 使用す るので， 内容を 変更して はいけ ません。 また， あらかじめ 内容を 設定して 
おく 必要は あり ません。 

(2) フォント カ インドの 値 

ここに 4 又め た 値を フォント カ インドと して t 旨定 する ことにより， この フォントを 利用して 文 
字 列の 描画^ が 行われます。 3 m ： の 値を 指定して ください。 また， 1 つの フォント カ インド 
には 1 つの フォント のみが' 刘 •応 します。 

(3) フォン ト 名への ポインタ 

ASCIIZ 型で 表現 さ れた フォント 名の 文字列への ボイ ンタが 入ります。 

(4) フ オン ト プロセスの アドレス 

フォント を 描画 したり， フォント に関する 計算を 行つ たりす る ルーチンの ア ドレス を 収め ま 
す。 フォント プロセスは， DO に コマンド コードが， AO には ハ。 ラ メータ ポインタが 格納され 
た 状態で 呼び出されます。 フォント プロセスの 中では DO 以外の レジスタは 破壊して はいけ 
ません。 

フォント プロセスを 設定 しないと きには ここに 〇 を 収めます が， その 場合は プロセス ボイ 
ンタ が 登録 さ れ ている， 対応す る 描画 ルー チ ンが砰 び 出されます。 

フォント プロセスの コマンドを 以下に 示します。 

• command =0: FPJNIT 

パラメータ なし 

返り 値 D 0.1 =0 正常終了 

丰 Q 異常終了 

フォント の 初期 イ 匕を 行 ■います。 

この コマンドは SX - SYSTEM からは 呼び出されません。 必要な 場合は， フォントを 追加 
した タス ク 等が 坪び 出 してく ださい* 3 。 

*3: もと もとの 仕様では $ AI 4 D GMInitialize で 呼び出される 予定だった よう です。 


フ オン トリ ンクの 形式は 次のと おりです。 


オフセット 

欄 名 

内 容 

+ $00.1 

fINext 

次の フ ォン トリ ンク への ポイ ンタ 

+ $04 .w 

flKind 

フォン ト カ イン ドの 値 

+ $06.1 

fIName 

フォン ト 名 （ ASCIIZ ) への ポインタ 

+ $0 a.l 

flProc 

フォン ト プロセスの ア ドレス 

+ $0 e.l 

fIMem 

フォン ト が 利用す る DOS メモリ ブロック への ポインタ 

+ $12.1 

fIRsv 

システム 予約 


N1/ \ / V \ — / \ / 

—— 2 3 4 5 

/ \ /IN /(\ / \ /(\ 


112 


1 グラフ イツ クマ ネー ジヤ 


• command=l : FP 一 TINI 

ハ 0 ラ メータ なし 

返り 値 D0.1 =0 正常終了 

丰〇 異常終了 

フォント を 開放す る 際の 欠 yi を 行います。 


• command=2 : FP_INFO 

パラメータ なし 

返り 値 D0.1 =〇 正常終了 

半 〇 異常終了 

1 文字の 全角 フォントの 幅と 高さの 最大値を 求めます。 
$A198 GMFontlnfo から 呼ばれます。 


• command=3 : FP DRAW (プロセス ポインタ +$〇〇 に 相当） 


ハ。 ラメー タ 

(AO).l 

文字列への ポインタ 


4(A0).l 

文字列 先頭からの オフセット 


8(A0).w 

文字列の バイト 数 

返り 値 

DO.l =0 

正常終了 


*0 

異常終了 

文字列の 描画を 行います。 


• command=4 : FP_LENGTH (プロセス ポインタ +$30 に 相当) 

ノ 、。ラ メータ 

(AO).l 

文字列への ポインタ 


4(A0).l 

文字列 先頭 か らの オフセット 


8(A0).w 

ドット 数 

返り 値 

DO.l 

文字列の バイト 数 


指定した ドッ ト数 内に 収まる 文字列の バイ ト 数を 求めます。 


• command=5 : FP_WIDTH (プロセス ポインタ +$2 c に 相当) 


ノ 、。ラメー タ 

(AO).l 

文字列への ポイ ンタ 


4(A0).l 

文字列 先頭からの オフセット 


8(A0).w 

文字列の バイト 数 

返り 値 

DO.l 

上位 ワード， イタリックを 含めた If 畐 （ド 


下位 ワード， イタリックを 含めない 幅 （ドット 数) 
指定し た 文字列の 幅を 求めます。 
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• command =6 : FP_REV 

フォントの 戻り 巾§ を 返します。 

現在は 使用され ていません。 

• command =7 : FP_RSV 

システム 予約です。 

(5) フォン トが ネ丨 J 用す る DOS メモリ ブロックへの ポインタ 

フォントの テた-タカ ? 収められ ている DOS の メモリ ブロ ック への ボイ ンタを 収めて おくと， 
フォント 開放 時に DOS コールの MFREE によって 自動的に 開放され ます。 その 必要が な 
い 場合は 0 を 収めて おきます。 

フォントの 披張 にと も なって， 現在の フ ォン トに 関する 情報を ま とめて 取得す る SX コー 
ル， $ A 1 C 3 GMCurFont が 追加され ています。 これに よって 得られる 情報は， フォント 
レコード という かたちで、 返さ れ ます。 フ オン トレ コー ドの 形式は 以下のと おり です。 


オフセット 

欄 名 

内 容 

+ $00 .w 

fmKind 

現在の フォン トの フォン ト カ インド 

+ $02 _w 

fmhace 

現在の フォン トの フォン ト フェイス 

+ $04.1 

fmSize 

現在の フォン トの フォン ト サイズを 示す ポイント 

+ $08.1 

fmWork 

現在の フォン トの 内部 データ 

+ $0 c.l 

fmRev 

戻り 幅の 最大値 （固定 小数点 数） 

+ $10.1 

fmWidth 

全角 文字 幅の 最大値 （固定 小数点 数） 

+ $14.1 

fmWhalf 

半角 文字 幅の 最大値 （固定 小数点 数） 

+$18.1 

fmHeight 

文字の 高さ （固定 小数点 数） 

+ $ lc.w 

fm Extra 

イ タリ ック 時の 追加 幅 

+ $ le.l 

fmXzoom 

X 方向 拡大率 （固定 小数点 数， 標準なら 0) 

+ $22.1 

fmYzoom 

Y 方向 拡大率 （固定 小数点 数， 標準なら 0) 


疑似 ダイアログ 


ユーザからの 入力を 受け付ける 場合， ダイアログは 非常に 重宝す る 反面， ほかの タスクが 停 
止して しまう という 問題が ありました。 ちょっとした 文字列の 入力な ど， ほかの タスクを 止め 
てま で ユーザの 注意を 集中 させる まで もな L 、場合の ために， 疑 f 以 ダイア ロ ダが 用意 さ れ ました。 

疑似 ダイアログは エディタ. x の 中で， ファイル 名の 入力な どに 用いられ ています （図 4)。 

ダイ ア ログと いう 名前が つ いては いますが， こ れはビ ッ トマ ッ プに 描画され る 図形の 一種と 
考えられます。 結局のと ころ， カレント ビットマップに 表示され る 長方形の 図形で しか ありま 
せん。 したがって， 疑 {以 ダイアログの 使い方は ダイアログ 等とは まったく 異なります。 

ウィンドウ コンテンツの 適当な 位置に 疑似 ダイアログを 描画したら， その内 部に コント ロー 
ル や テキスト エディットを 置いて， ユーザからの 操作に 対応し ます。 この コントロール 等は， 
結局 ウインドウ コンテンツ 上に ある だけです から， その 处理 に なんら 特別な 手法は 必要と され 


114 


■図 4 疑似 ダイアログ 


1 グラフ イツ ク マネージャ 



ません。 

リターン キーが 押される なり， ボタンが 押される なり して 疑似 夕 M ア ログ 上での 操作が 終了 
したら， コントロール 等を 廃棄して ウインドウの 内部を 書き直せば， 疑似 ダイアログ に関する 
処理は 完了です 0 


下位 ルーチンの ユーザへの 開放 


グラフ イ ック マネ ー ジヤの 描画 ノレ ー チン や フォントの 描画 ル ー チンな ど， 下位の 描画 ル ー チ 
ンを アプリケーション 作成者が つくる こ とがで きる ようになった わけです が， それを 支援す る 
ために， SX - SYSTEM 内の 下位 ルーチンを 利用す る こ とがで き るよう になり ま した。 

$ A 1 E 3 GMGetHProcTbl , $ A 1 E 6 GMGetStdProcTbl ， $ A 1 E 7 GMGetFont 
ProcTbl , $ A 1 E 8 GMGetRgnProcTbl は， それぞれ 水平 描画の 初期化 ルーチンの テ ー 
ブル， 標準 描画 ル ー チンの テ ー ブル， 文字 描画 ル ー チンの テ ー ブル， リ ー ジョン 1 行 丨寅算 ル ー 
チンの テー ブルを 得る ための SX コールです。 テーブルを 参照して， 必要な 引数を 添えて 呼 
び 出す ことによって， これら 下位の サブルーチンを 利用す る ことができます。 

これらの テーブルは， いずれも SX - SYSTEM 内部に あります から， 変更す る ことは でき 
ません。 

それぞれの テーブルの 形式と， そこに 登録され ている 下位 ルーチンに ついて， かんたんな 機 
能と， 引数， 返り 値を 示す ことにします。 


籲 痛 剿 ン听ー ブル （ $A1E3 GMGetHProcTbl) 


オフセット 

欄 名 

内 容 

+ $00.1 
+ $04.1 
+ $08.1 

hLinelnit 

hCopylnit 

hPutlnit 

水平 ライ ン 描画の ための 初期化 ルーチン 
水平 ライン コ ピーの ための 初期化 ルーチン 

1 ラインの 描画を 行うた めの 初期化 ルー チン 


(1 ) hLinelnit : 水平 ライン 描画の ための 初期化 ルーチン 

引数 A 0.1 水平 ライン 描画 用 ワークへの ポインタ 
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(AO).l 1 ライン 描画 サブルーチンの ア ドレス 

4(A0).l 0 ページ 描画 ルーチン エン トリ アドレス 

8(A0).l 1 ページ 描画 ルーチン エン トリ アドレス 

l£(AO).l Z ページ 描画 ルーチン エン トリ アドレス 
16(A0).l 3 ページ 描画 ルーチン エン トリ アドレス 
£0(A0).w パターンの Y オフセット 
2£(A0).w パターンの 1 行の バイト 数 
£4(A0).w パターン オフセットの マスク データ 
£6(A0) 縦横 16 ドッ トの パターン 

: (スクリーン タイプに よって 内容 •サイ ズ は変イ t) 

A5.1 す 苗 画を 行う グラ フ ポー トレ コー ドへの ポインタ 
返り 値 D0.1 リザルト コード 

(2) hCopylnit : 水平 ライン コピーの ための 初期 イレ レー チン 
引数 DO.w コピー モード 

A0.1 7k 平 ライン コピー 用 ワークへの ポインタ 

(AO).l 1 ライ ン コピー サブルーチンの ア ドレス 

4(A0).l 0 ページ コ ピールー チン エン トリ アドレス 

8(A0).l 1 ページ コピー ルーチン エン トリ アドレス 

l£(AO).l £ ページ コ ピールー チン エン トリ アドレス 
16(A0).l 3 ページ コ ピールー チン エン トリ アドレス 
£0(A0).w 0 ページ 反転 データ 
££(AO).w 1 ページ 反転 データ 
£4(A0).w £ ページ 反転 データ 
£6(A0).w 3 ページ 反転 データ 
£8(A0).w コ ピー 元の X オフセット 
30(A0).w コ ピー 元の Y オフセット 
32(A0).l コ ピー 元の 1 ページの バイト 数 
34(A0).l コ ピー 先の 1 ページの バイト 数 
36(A0).l 「右から 左 コピー」 フラグ 
A1.1 コピー 先の ビッ ト マップ レコードへの ポイ ンタ 
A2.1 コピ ー 元の ビッ ト マップ レコ ー ド への ポインタ 
返り 値 D0.1 リザ ノレ トコ ー ド 

(3) hPutlnit : 1 ライ ンの 描画を 行うた めの 初期化 ルーチン （ 1 ページの テキス ト タイプの み ) 

弓 | 数 A0.1 7]c 平 ライン コピー 用 ワークへの ポインタ 
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1 グラフ イツ クマ ネー ジヤ 


( AO).l 1 ライン コピー サブルーチンの ア ドレス 
4( A 0 ).l 0 ページ コピー ルー チン エントリ ア ドレス 

8( A 0 ).l 1 ページ コピー ルーチン エン トリ アドレス 

12( A 0 ).l Z ページ コピー ルー チン エン トリ アドレス 
16( A 0). l 3 ページ コピー ルーチン エン トリ アドレス 
£0( A 0 ).w フオ アグ' ラウンド カラー 
££( AO).w バックグラウンド カラー 
24( A 0 ).w 2 ページ 反転 データ 
26( A 0 ).w 3 ページ 反転 データ 
£8( A 0 ). w コ ピー 元の X オフセット 
30( A 0 ). w コ ピー 元の Y オフセット 
3£( A 0 ).l コ ピー 元の 1 ページの バイト 数 
34( A 0 ).l コ ピー 先の 1 ペー ジの バイト 数 
36( A 0 ).l 「右から 左 コピー」 フラグ 
A 1.1 ネ苗 画を 行う グラフ ポート レコードへの ポインタ 
返り 値 D0.1 リザルト コード 

鲁標辑 SH ノ ンの テーブル （ $A1E6 GMGetStdProcTbl) 

グラフ ポート レコー ド 中で' 指* 定 される， グラフ イ ック マネージャの ネ苗画 ルーチンの テー ブル 
(プロセス ポインタ） と 同形 式です。 


オフセット 

櫚 名 

内 容 

+ $00.1 

gText 

文字列の 描画 ルーチン 

+ $04.1 

gLine 

ラインの 描画 ルー チン 

+ $08.1 

gRect 

レ クタ ン グルの 描画 ルーチン 

+ $0c.l 

gRRect 

ラウンド レク タン グルの 描画 ルー チン 

+ $10.1 

gOval 

精 円の 描画 ル ー チン 

+ $14.1 

gArc 

円弧の 描画 ル ー チン 

+ $18.1 

gPoly 

ポ リコ ンの 描画 ル ー チン 

+ $lc.l 

gRgn 

リージ ョ ンの 描画 ルーチン 

+ $20.1 

gCopy 

ビッ ト イメージの コピー ルーチン 

+ $24.1 

gRsvl 

システム 予約 

+ $28.1 

gRsv2 

システム 予約 

+ $2c.l 

gWidth 

文字列の 幅を 求める ルーチン 

+ $30.1 

gTinW 

指定の 幅に 収ま る 文字列の バイ ト 数を 求める ルーチン 

+ $34.1 

gRsv3 

システム 予約 

+ $38.1 

gRsv4 

システム 予約 

+ $3c.l 

gRsv5 

システム 予約 


(1) gText : 文字列の 描画 ルーチン 

引数 （AO).l 文字列への ポインタ 

4(A0).l 文字列 先頭 か らの オフセット 


\)/ \)/ V)/ \)/ \)/ \)/ \)/ \ — / N1/ 

I 23456789 

rv / — X /1\ /(\ /»»\ /(\ /|\ /1\ /(\ 


〇 — 
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8(A0).w 文字列の バイト 数 
返り 値 D0.1 リザルト コード 

(2) gLine : ラインの 描画 ル-チン 


引数 

(AO).w 

終点の X 座標 


£(AO).w 

終点の y 座標 

返り 値 

D0.1 

リ ザル トコ ー ド 

(3) gRect : レク タング ルの 描画 ル-チン 

引数 

(AO).w 

=0 枠を 描画 

=1 塗り潰しで 描画 


2(A0).l 

レ クタ ンク 、、ノレ レコード への ポインタ 

返り 値 

D0.1 

リ ザル トコ ー ド 

(4) gRRect : ラウンド レク タング ルの 描画 ルーチン 

引数 

(AO).w 

=0 枠を 描画 

=1 塗り潰しで 描画 


2(A0).l 

外接す る レク タング ルレ コー ドへの ポイ ンタ 


6(A0).w 

X 方向の 角の 大きさ 


8(A0).w 

y 方向の 角の 大きさ 

返り 値 

DO.l 

リ ザル トコ ー ド 

(5) gOval : 楕円の 描画 ルーチン 

引数 

(AO).w 

=0 枠を 描画 
=1 塗り潰しで 描画 


£(AO).l 

外接す る レク タング ルレ コー ドへの ポイ ンタ 

返り 値 

DO.l 

リ ザル トコ ー ド 

(6) gArc ： 円弧の 描画 ルーチン 

引数 

(AO).w 

=0 枠を 描画 

=1 塗り潰しで 描画 


2(A0).l 

外接す る レク タンク、 、ルレ コー ドへの ポイ ンタ 


6(A0).w 

開始 角度 


8(A0).w 

終了 角度 

返り 値 

DO.l 

リ ザ ノレ トコ ー ド 
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(7) gPoly : ポリ ゴンの 描画 ルーチン 

引数 （AO).w =0 枠を 描画 

=1 塗り潰しで 描画 

£(A0).l ポリ ゴン レコ ー ドへの ポイ ンタ 
返り 値 D0.1 リザ' ル トコー ド 

(8) gRgn : リージョンの 描画 ルーチン 

引数 （AO).w =0 枠を 描画 

=1 塗り潰しで 描画 

2(A0).l リージョン レコ ー ドへの ハン ドル 

返り 値 D0.1 リザルト コード 


(9) gCopy • ビット イメージの コピー ルーチン 

引数 （ AO).l コピー 元ビッ ト マップ レコードへの ポインタ 

4( A 0 ).l コピー 先ビッ ト マップ レコードへの ポインタ 

8( A 0 ).l コ ピー 元 レク タング ルレ コードへの ポインタ 


返り 値 


$ c ( A 0 ).l コピー 先レク タング ルレ コードへの ボイ ンタ 

$10( A 0 ).w コピー モード 

$ l £( A 0). l y スク 範囲の リージ ヨン レコ ー ドへの ハンドル 
D 0.1 リザルト コード 


(10) gWidth : 文字列の 幅を 求める ルーチン 

引数 （A0).l 文字列への ポインタ 

4(A0).l 文字列 先頭からの オフセット 
8(A0).w 文字列の バイ ト 数 

返り 値 D0.1 上位 ワード， イタリックを 含めた 幅 （ドット 数） 

下位 ワード， イタリックを 含めない 幅 （ドット 数） 


(11) gTinW : 指定の 幅に 収ま る 文字列の バイ ト 数を 求める ルーチン 

引数 （AO).l 文字列への ポインタ 

4(A0).l 文字列 先頭からの オフセット 
8(A0).w ド ット数 


返り 値 D0.1 文字列の バイト 数 
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(1) andRgnLine : リージョンの AND を 求める ルーチン 

引数 A 0.1 結果を 収める バッファへの ポインタ 

A 1.1 リ ー ジョン 1 への ポイ ンタ 

A 2.1 リ ー ジョン £ への ポイ ンタ 


鲁 文字 描 翻 卜う 1 ンの テー ブル （ $A1E7 GMGetFontProcTbl) 


⑴ 

⑵ 


(1) f ace Job : 文字を 修正す る ルーチン 

引数 （ SP).l 文字の 描画され ている ビッ ト マップ レコードへの ポインタ 

4( SP ). l 文字の 大きさ を 示す レ クタ ングル レコードへの ポインタ 
8( SP ). l フォント フェイス 
返り 値な し 

フォント フェイスに したがって 文字を fl 塞 正します 。 fl 塞 正の 結果 文字の 大きさが 策 化; した 場 
合 （最大 縦 4 ドット， 横 4 ドットまで 大きくな ります） は， 引数と して 渡した レク タング ル 
レコードの 内容を 変イ 匕させます。 イ タリ ックの 切: 理は 行いません。 

(2) putCharJob : 文字を 描画す る ルーチン 

引数 （ SP).l 文字の 描画 さ れ ている ビットマップ レコ ー ドへの ポ インタ 

4( SP ). l 文字の 大きさ を 示す レ クタ ングル レコードへの ポインタ 
返り 値 D0.1 リザ ル トコー ド 

カレント グラフ ポート に 指定され たビッ ト マップの レク タング ノレの 範囲を 文字と して 描画し 
ます。 イタリックの 处理 はこ こで 行われます。 

• リージ ヨン 1 庁黯ノ ン听ー ブル （ $A1E8 GMGetRgnProcTbl) 

これらの ルー チンは， リージョンの 横 1 ラインを 単位と して 处理を 行います。 したがって， 
引数と なる のは， リージョン レコ ー ド 中の 横 1 ライ ンの 先頭の アド レスです。 


オフセット 

欄 名 

内 容 

+ $00.1 
+ $04.1 

faceJob 

putCharJob 

文字を 修正す る ルーチン 
文字を 描画す る ルーチン 


オフセット 

欄 名 

内 容 

+ $00.1 
+$04.1 
+ $08.1 
+ $0c.l 

andRgnLine 
orRgn し ine 
diffRgn し ine 
xorRgn し ine 

リージ ヨ ンの AND を 求める ルーチン 
リージ ヨ ンの OR を 求める ルー チン 
リージ ヨ ンの 差分を 求める ルーチン 
リージ ヨ ンの X0R を 求める ルー チン 


I 2 3 4 


120 


1 グラフィック マネージャ 


返り 値 A0.1 

A1.1 

結果を 収める バッファへの ポインタ （リージョン 1 AND リージョン 2) 

リージョン 1 の 次の ラインへの ポインタ 

A£.l 

D0-D3 

リ ー ジョン 2 の 次の ライ ン のポイ ンタ 

不定 


(2) orRgnLine : リージ ヨンの OR を 求める ルーチン 


引数 A0.1 

A1.1 

結果を 収める バッファへの ポインタ 

リージョン 1 への ポインタ 

A2.1 

リ ー ジョン 2 への ポイ ンタ 

返り 値 A0.1 

A1.1 

A£.l 

結果を 4 又め る パ、 ッ ファへの ポインタ （リージョン 1 OR リージョン 幻 

リージョン 1 の 次の ラインへの ポインタ 

リ ー ジョン £ の 次の ライ ン のポイ ンタ 

D0-D3 

(3) diffRgnLine : 

引数 A0.1 

A1.1 

不定 

: リージョンの 差を 求める ルーチン 

結果を 収める バッファへの ポインタ 

リージョン 1 への ポインタ 

A2.1 

返り 値 A0.1 

A1.1 

リージョン 2 への ポインタ 

結果を 収める パ、 ッ ファへの ポインタ （リージョン 1- リージョン 2) 

リージョン 1 の 次の ラインへの ポインタ 

AE.1 

リージョン 2 の 次の ラインの ポインタ 

D0-D3 

(4) xorRgnLine : 

引数 A0.1 

A1.1 

不定 

リージョンの XOR を 求める ルーチン 

結果を 収め る バッファへの ポインタ 

リージョン 1 への ポインタ 

AZ 1 

リージョン 2 への ポインタ 

返り 値 A0.1 

A1.1 

A2.1 

結果を 収める バッファへの ポインタ （リージョン 1 XOR リージョン 幻 

リージョン 1 の 次の ラインへの ポインタ 

リージョン 2 の 次の ラインの ポインタ 

D0-D3 

不定 


COLUMN | T | TLE X の 役割 

システム デイ スタの 中に 収め られ ている TITLE.X は， SX-WINDOW の オープニング タ 
イ トルを 表示す る だけの プログラム だと 思われて いますが， 案外， いろいろな 仕事を する プ 
ログ ラムです。 

TITLE.X が 使われる のは， ① SX-WINDOW の 起動時と， ② SX-WINDOW の 終了 時で 
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す。 いずれも， システム ディスク のように SXWIN.X を シェルと して 起動す る 場合な ので， 
コマンド ラインから SXWIN.X を 起動して いる 方は あまり お 目に かかる ことは ないか もしれ 
ません。 

そ れぞれ の 場合の TITLE.X の 動き について 説明 します。 

① SX - WINDOW の 起動時 

システム デイ スタの CONFIG.SYS の 中で， TITLE.X に 関係して いる 部分を 抜き出して 
みまし よう。 


PROGRAM = ¥SHELL¥TITLE.X 

TITLE.X は， この 行に よって 起動され， 下図の ような 画面を 表示し ます。 

■図 TITLE . X による タイトル 表示 



このと き， SRAM が 初期化 さ れ ていなかった 場合には 初期化を 行います。 

また， TITLE.X の 後ろに ファイルネームを 指定す る ことによって， その ファイルに テキ 
スト タイプ 2 ページの レク タング ル イメージが 収められ ていた 場合， 標準の タイ トル 画面の 
かわり に 表示し ます。 


② SX - WINDOW の 終了 時 

SXWIN.X が シェルと して 起動され ている 場合に， システム アイコンから 「終了」 が 選択 
される と， シェルは リ ソース CMDS の 13 に 収められ ている プログラムに， ShEV の 3 に 
収められ ている コマンド ラインを 渡して 起動し ます （その 際， タスク マ彳 、ー ジャの FOCK 
系では なく， DOS コールの EXEC で 起動し ます ）〇 

標準の 状態では， CMDS の 3 には TITLE.X が， ShEV の 3 には -e が 収められ ている 
ので， 結局， TITLE.X 力し e という オプション 付きで 起動され る ことになります。 -e オプ 
ション 付きで 起動され た 場合， TITLE.X は いったん タイ トル 画面 （この場合， つねに 標準 
の タイトル 画面で， イメージを 収めた ファイルを 指定す る ことは できません） を 表示した 後， 
徐 々に フェードアウトし， もっとも 暗く なった ところで 終了し ます。 

TITLE.X (とは かぎりません 力” の 処理が 終わり， シェルに 戻る と， シェルは 無限 ルー 
プに 入り， 電源 オフを 侍つ ことになります。 
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2 2 | テキスト マネージャ 


SX 1 .02 の テキス ト マネージャは， いちおうの 文書 編集機能を 有して いたとは いえ， ス ピー 
ド 的な 問題 や 機能的な 問題を 抱えて おり， 事実上， ファイル 名の 入力 程度に しか 使われて い 
ませんで した。 新しい テキス ト マネージャでは， これらの 問題は クリアされ ており， 実用に 
耐える ものと なって います。 標準 添付の エディタ .X がその 改良の 結果を 如実に 物語って いま 
す* 4 〇 

*4: 本書 も 一部 エディタ . x によって 執筆され ています。 


改良され たとは いえ， SX1.02 との 上位互換性は 保たれて いるので， これまでの 利用 方法 
を その ま ま 適用す る ことができます。 エディタ や ワープロ など 高度な アプリケーションを 作成 
される 方 以外は， とくに プログラミング スタイルを 変更す る ことなく， スピードアップの 恩恵 
のみを 被る こ と 力 5 'できます。 

ここでは， おもな 変更 さに ついて 解説す る ことにします。 


|1 行と 段落の 概念 

新しい テキスト マネージャでは， 画面 上で 横 1 行に 表示され る 文字列を 「行」， メモリ 内の 
行末 コード （$OD$OA) までの 文字列を 「段落」 と 呼びます。 前者を いわゆる 「物理 行」， 後 
者を 「論理 行」 といい 替える こと もで きます （図 5)。 

■図 5 行と 段落の 関係 



一見 同じ ものの ように も 思えます が， 行と 段落が 違う ものになる のは， ディ ステ ィネ ーショ 
ンレク タング ノレの 横 方向の サイズに よって， 行の 折り返し 力 5 ' 発生す るからで す 0 この あたりに 
ついては， 前著 『SX-WINDOW 〜』 で 解説 済みです ので， 繰り返しません。 


テキス ト エディツ ト レコ ー ドの 変更 


各種の 拉 張に 対応す るた め， テキス ト エディッ トの 内容が かなり 変更され ています。 基本的 
に SX1.10 は， それ 以前の システムとの 上位互換性が _ されて いますが， テキス ト エディ ッ 
ト レコード に関して 完全に 互換と いう わけには いかなかった よ うです。 レコードの 内容を 直接 
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参照/変更 している アプリ ケー シヨ ンは 注意力 5 ' 必要です。 

新しい テキス ト エディツ トレ コードの 内容は 次のと おりです 0 SX 1.10 以降で 新し 〈用意 
された 攔 のうち， 必要と 思われる ものに ついての み 解説を 行う ことにします。 


⑴ 水平 方向 補正 座標 

(2) 垂直 方向 補正 座標 

ビュー レク タング ノレに 対する デイ ステ イネ ー シヨ ンレク タング ノレの オフ セッ トが 入り ます。 

(3) 編集 テキストへの ハンドル 

編集 テキスト が 収められ ている 再 香 己 置 可能 ブロ ッ ク への ハン ドルが 収められて います。 
テキス トが 収められる ブロ ックは 新しく テキス ト エディット を 作成す る 際に 作成され ます 
が， アプリケーション 側で 用意した ものを セッ トする こと も 可能です。 その 際， テキス トの サ 
イズ より も*® 8 パ、 イ ト Oh * きな ブロックを 用意す るよう にして くだ、 さい。 

(4) ユーザ 定義 データ 

ューザが 自由に 使用す る ことができます。 


オフセット 

欄 名 

内 容 

+ $00 

teDestRect 

デイ ステ イネー シヨ ンレク タング ル 

+ $08 

teViewRect 

ビュー レク タング ル 

+ $10.1 

teDestOffsetX 

水平 方向 補正 座標 

+ $14.1 

teDestOffsetY 

垂直 方向 補正 座標 

+ $18.1 

teHText 

編集 テキス トへの ハンドル 

+ $ lc.l 

teLenMax 

編集 テキス トの 最大 サイズ 

+ $20.1 

teLength 

すでに 入力され ている 編集 テキス トの サイズ 

+ $24.1 

teRsvO 

システム 予約 

+ $28.1 

teSelStart 

セレ ク ト 範囲の 開始 位置 

+ $2 c.l 

teSelEnd 

セレ ク ト 範囲の 終了 位置 

+ $30.1 

teSelLine 

現在の セレ ク ト 行 位置 

+ $34.1 

teSelOffset 

現在の バ ッ ファの セレクト 位置 

+ $38.1 

teRefCon 

ューザ 定義 デー タ 

+ $3 c.w 

te し ineHeight 

改行 幅 （ドッ ト 単位） 

+ $3 e.w 

teTabSize 

TAB サイズ （ドッ ト 単位） 

+ $40 .w 

teJust 

行 揃え モード （0: 左 寄せ， 丨 ： 中央 寄せ， 一 1: 右 寄せ） 

+ $42 .b 

teDrawMode 

編集 モード 

+ $43 .b 

teVis 

ドロー レベル 

+ $44.1 

teSelLocateX 

水平 座標 ロング 値 

+ $48.1 

teSel Locate Y 

垂直 座標 ロ ング値 

+ $4 c.l 

telnPort 

グラフ ポー トレ コー ドへの ポインタ 

+ $50.1 

teCaretTime 

内部で 使用 （キヤ レットの 点滅 間隔） 

+ $54 .w 

teCaretState 

内部で 使用 （キヤ レットの 状態/ハイ ライ ト 表示 レベル） 

+ $56.1 

teFunction 

プロセス テーブルへの ポインタ 

+ $5 a.l 

teFuncCode 

1 ファン クシ ヨン キー アサイン テーブルへの ポインタ 

+ $5 e.l 

teCtrICode 

コン ト ロール キー テーブルへの ポイ ンタ 

+ $62.1 

teCtrlFun 

コン ト ロール キー 処理 ルーチン テーブルへの ポインタ 

+ $66.1 

teNColumns 

テキス トの 段落 数 

+ $6 a.l 

teNLines 

テキス トの 行数 

+ $6 e.l 

te し ineStarts 

内部で 使用 （行頭 テー ブルへの ハンドル） 


N1/ \]/ \)/ ^1/ V)/ 

\)/ \]/ \)/ \)/ \)/ \ny \ly O H 2 3 4 5 
I 2 3 4 56789 I I I 丨 I I 
/ /f\ /fv /IV /(\ / \ > N /IV /(\ /l\ /fv /l\ /#v /(N 
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(5) 編集 モード 

テキスト エディット に関する 各種 フラグの 集合体です。 各 ビットは， 次の ような 意味を 持つ 
ています。 


意味'' 

— ______ 値 

1 

0 

bitO 

改行 コー ドの 表示 

表示す る 

表示し ない 

bitl 

テキス ト 終端の 表示 

表示す る 

表示し ない 

bit2 

コン ト ロ ー ルコ ー ド の 表 不 形式 

" A 

S B 

bit3 

コン ト ロール コー ドの 編集 許可 

許可す る 

許可し ない 

bit4 

リード オンリー 属性 

リ ー ド オンリ ー 

編集 可 

bit5 

下 揃え 

下 揃えす る 

下 揃えし ない 


(6) ドロ ー レベル 

ドロ — レベルが 〇 以上の 場合に テキス ト エディッ トの 描画を 行い， 負の 数の 場合は 描画を 
行いません 0 ドロー レベルは 描画 だけを 制御す る もので， 描画が 行われて いない 場合で も， 編 
集の Si 理は 通常 どおり に 行われます。 

(7) 水平 座標 ロング 値 

(8) 垂直 座標 ロング 値 

ディ ステ ィネー シヨ ンレク タング ル 内部での カーソルの 位置を ロング ワードで 表現し ま 
す 。 

(9) グラフ ポー ト レコードへの ポインタ 

SX 1.02 までは， テキスト エディットの 表示を 行いたい グラフ ポートを， 表示の 前に カレ 
ント にしておく 必要が ありま した 力す， SX 1.10 からは テキス ト エディッ トレ コードの 中に 表 
示を 行う グラフ ポー トへの ポインタを 収める ようになりました。 これに よって， カレント グラ 
フ ポート を セッ トする 必要は な くな り ま した。 

この グラフ ポートに 設定され ている フ ォン ト 等を 変更す る こ とに より， 描画す る フォント 等 
も 変わる わけです が， その場合には $ A 464 TMSetSelCal を 呼んで， テキス ト エディット 
レコード 全 伸: を 十算 させた う えで:^ 勘 画す るよう にして くだ、 さい。 

(10) ハイ ライ ト 表示 レベル 

ハイライト レベルが 0 以上の 場合， セレクト 範囲の ハイライト 表示を 行い， 負の 数の 場合 
は 描画を 行いません。 

(11) プロセス テーブルへの ポインタ 

テキスト の 編集 や 表示を うため の ルーチン はフ 。ロ セス テーブルに 登録 さ れ ており， テキス 
ト マネージャ はこ こ に 収め られ ている プロセス テー ブルへの ボイ ンタを 参照し て 各 処理へ 分岐 
します。 した 力 5 ' って， ここに 別の ルーチンを 登録した プロセス テーブルへの ポインタを 格納し 
て おく こ とに よって， これらの ルーチンを 差し替える こ とが^ 能です。 

デフ ォル トでは SX - SYSTEM 内の テーブルを 指 1 している ので， 直接 テーブルを 書き換え 
ようとす ると， バス エラーが 発生す る 場合が あります。 あらかじめ， ほかの 場所に 標準の テ ー 
ブルを コピーして おいて， そこを 書き換え たうえで テキス ト エディット レコードに 登録して く 
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ださ ぃ。 

詳しい 内容に ついては 後述し ます。 

(12) ファンクションキー アサイン テーブルへの ポインタ 

定義 可能 キー （ F 1 〜 F 20， カーソル キー， ROLLUP / DOWN ， UNDO 等） に コント ロー 
ル コー ドを 割 り 当てる のが， ファンク ショ ン キー アサイ ン テーブルの 役割です 0 
ファンクションキー アサイ ン テーブルの 形式を， 次の 例で' 示します。 


funcAssignTable : 

dc.w 

dc.w 

$0030, $10 
$003E3,$0E 

* キー コード， 

氺 カーソル 上， 

* 力ー ソル 下， 

ASCII コード 

$io r p ) 

$0E r N) 

dc.w 

0 

* エン ド マーク 


(ラベルは 筆者が 独自に 定義した ものです) 


1 ワードず つ， キー コード （ IOCS の B KEYINP ， _ B _ KEYSNS 等で 使われる 内部 
コード） と， その キーに 対応 させたい コントロール コードを 並べ， 最後に エンド マークと して 
$00 を 置きます。 

上の 例では， 編集 中に カーソル キーの 上が 押された 場合は へ P が 押された のと， カーソル 
キーの 下が 押さ れた 場合は △ N が 押された の と 同じ ことになります。 

デフ ォルトでは， SX - SYSTEM 内の テーブルを 指して いるので， 直接 テーブルを 書き 換 
えよう とすると， バス エラーが 発生す る 場合が あります。 あらかじめ， ほかの 場所に 標準の テ ー 
ブルを コピーして おいて， そこを 書き換え たうえで テキス ト エディツ トレ コードに 登録して く 
ださ ぃ。 

(13) コント ロ ー ルキ ー テ ー フルへの ポインタ 

(14) コントロール キー 处理 ルーチン テ ー フルへの ポインタ 

編集 中に コント ロー ル コードが 入力され た 場合の 处 理を戀 象して おく テープ ノレが コン トロー 
ル キー 效理 ルーチン テ ー ブルです。 

SX 1.02 の テキス ト エディ ツ ト にも 同様な テーブルが 用意され てい ま したが， 多少 形式が 
変更され ている ので 注意が 必要です。 

コント ロール キー テーブルの 形式は SX 1.02 から 変わって いません 0 次の 例の よう な 形式 
です 0 


ctrlKeyTable : 

dc.w 

$0d 

氺リ ターン キー 

dc.w 

$08 

* へ H (BS) 
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dc.w 0 氺 エンド マーク 

(ラ ベル は 筆者が 独 自に 定義した ものです） 


これに 対応す る ルー チンを 列挙す る コント ロール キー 処理 ルーチン テーブルは， 次の ような 
形式と なります。 

ctrlKeyProc : 

dc.l CRproc * リター ン キーを 押し た 処理 

dc.l BSproc * BS キーを 押し た 処理 

(ラ ベル は 筆者が 独 自に 定義した ものです） 


SX 1.02 では 处理 ルーチンへの オフ セッ トで 表現して いま したが， 新しい テキス トマ ネー 
ジャ では ポ インタと なって います。 

コント ロー ル キー テーブル， コント ロール キー 处理 ルーチン テーブルと ともに， デフ オルト 
では SX - SYSTEM 内の テーブルを 指して いるので， 直接 テー ブルを 書き換えよう とすると 
バス エラー カす 発生す る 場合が あります。 あらかじめ， ほかの 場所に 標準の テーブルを コピーし 
ておいて， そこを 書き換え たうえで テキス トエ テ、、 イット レコードに 登 i 录し てく だ さい。 

(15) 行頭 テーブルへの ハンドル 

行頭 テーブルは， SX 1.02 にく らべ 大幅に 構造が 変更され ています。 行頭の オフセットを 
単純に 並べた ものでは なく， 各行の バイ ト 数 や 行の 状態な どの 情報が 格納され る テーブルに な 
り ま した。 

各行 （段落） の 状態を 得る ための SX コールが いくつ 力 1 用意され たので， アプリ ケー シヨ 
ンが 直接 参照/変更 する メリ ッ トは もはやな いと 思われます。 


段落 情報 


従来は， ある 行が テキスト 全体の 中で どのような 位置に あるの か， などと いった 情報を 得る 
手段が ありませんでした。 また， 行 単位， 段落 単位での 現在 位置の 把握 も 不可能でした。 こう 
した* 倩 報は， 本格 fi 勺な エデ 'イタ や ワープロを つく るた めには どう しても 必要な ものです。 

新しい テキス ト マネージャには， こう した 情報を 得る ための SX コールが 何* 頃 か 用意 さ 
れ ています が， これらは い ずれ も 情報を 段落 情報 という かた ちで' 返して きます。 

段落 情報 レコ— ドの 形式は 次のと おり です。 


127 


第 2 章 拡張され た マネージャ 


オフセット 

欄 名 

内 容 

+ $00.1 

teCoPos 

段落 位置 

+ $04.1 

toCoLcnt 

段落の 行数 

+ $08.1 

teCo し ine 

段落の 先頭 行 位置 

+ $0c.l 

teCoOffset 

段落の 先頭 行の オフセット 

+ $10.1 

teCoSize 

段落の バイ ト 数 

+ $14.1 

teCoPtr 

段落への ポインタ 

+ $18.1 

teLine 

行 位置 

+ $lc.l 

teLOffset 

行の先頭 位置 オフセット 

+ $20.1 

te し Size 

行の バイト 数 

+ $24.1 

teLPtr 

行への ポインタ 


f [ 編集 履歴 


SX 1.02 まででは， 編集を 行った 結果 再 描画が 必要と なった 場合には ビュー レク タング 
ル 全体を 書き換えて いま した。 これが 处 理 スピードを 低下させる 原因の 1 つで も ありま した。 
これを 避ける ためには， 変更が あった 場所の みを 書き換えれば よい ことは すぐに 気がつきます。 

編集 履歴は， どこで， どのような 変更が あった のかを 記録して お 〈ための データ 構造です。 
そ の 内容は 編集 履® レコ ー ドに まとめられ ま す 0 編集 履 M レコー ドの 形式は 以下のと おり デ、 す 0 


オフセット 

欄 名 

内 容 

+ $00.w 

teEditOn 

編集され たか どうかの フラグ （弇 0: 編集され た） 

+ $02.1 

teEditn し ine 

編集 行数 

+ $06.1 

teEditStart 

編集 開始 バイ ト 位置 

+ $0a.l 

teEdit し ine 

編集 開始 行 位置 

+ $0e.l 

teEdit し ocateH 

編集 開始 水平 座標 

+ $12.1 

teEdit し ocateV 

編集 開始 垂直 座標 

+ $16.1 

teEditLocateM 

編集 開始 座標 修正 値 

+ $la.l 

teEditCo し ine 

次の 段落の 先頭 行 位置 

+ $le.l 

teEditCodiff 

次の 段落が スクロールした かどう かの フラグ （右 0 : 
スクロールした） 


編集 履歴は $ A 348 TMStr 2 によって 作成され， $ A 338 TMUpDate £ によって 解釈 さ 
れ， 描画が 行われます。 

[b 「 キャッシュ 機能の 追加 

スピード 向上の もう 1 つの 方策と して， キャッシュ 機能の 追加が あります。 キャッシュに 
は テキストの 一部が 1 売み 込まれ， 編集 作業は 一時的に この 中で 行われます。 

大きな テキス トの 場合， 細かい 変更を 行うた びに テキス ト 全体を 操作して いたのでは 時間が 
かかりす ぎます。 キャッシュを 追力卩 した ことにより， 編集の 結果を 効率よ く テキスト 全体に 反 
映させる こ とが' できる よう になって います。 

キャッシュが 追加され たこ とに より， 2 つ ほど 注意が 必要に なって います。 


128 


2 テキス ト マネージャ 


(1) テキストを 直接 参照す る 場合 

テキス トを 直接 参照す る 場合は， 変更した 結果が キャッシュに 残って いて， テキストに 反映 
されて いない 場合が' あり ますから， 必ず キャッシュを フラッシュ してから 参照す るよう にして 
くださぃ 。 

(2) $A33CTMCalLine で 段落を 参照す る 場合 

指定した 行 または バイ ト 位置の 段落 情報を 作成す る $A33C TMGalLine では， 段落 情報 
の 中に 段落への ポインタを 返します。 これを 利用して テキストを 直接 参照す る こと も 可能です 
が， この 段落が キャッシュ 中に 残って いる 場合， キャッシュ 中の アドレスが 返される 場合が あ 
ります。 この アドレスを 使って， この 段落に 正しく 参照す る ことができます が， このほかの 段 
落に ついては 保証の かぎり では あり ません。 


キャッシュを 操作す る SX コールと して， $A32G TMCacheON,$A3ED TMCacheOFF, 
$A3£ETM CacheFlush が 用意 さ れ ています。 


アップ デ ー ト 処理の 充実 

編集 履歴に よって 部分的な 書き換えが サポートされ たこ とな どから， 多彩な アップデートが 
用意され ています。 

このうち， SX コールで サポート される ものが 3 種類， ライブラリ でのみ サポート される 
ものが 2 _ あります。 それぞれ について 解説し ます。 


< sx コールで サポート される もの > 

•SA313 TMUpDate 

これは SX1.02 から 用意され ている SX コールです。 指定した レク タング ルの 内部を 背景 
色で 塗り潰してから 画します。 スピード 的には もっとも 不^です が， f 适* の 手順を 変更し 
てまで ほかの SX コールを 利用す るか どう 力、， 適切に 判断して 利用して ください。 

•SA338 TMUpDate? 

$A348 TMStr£ によっ て 文字列 を 挿入し た 後での み 利用 可能です。 TMStr£ が 作成し 
た 編集 履歴を 参照して 描画を 行います。 条件は 限定され ますが， これに よって アップデートを 
行う のが もっとも 速く 行えます。 

•$A339 TMUpDa1:e3 

指定した レク タング ルの 内部を 帮苗 画する のは $A313 TMUpDate と 同じです が， 背景 
色での 塗り潰しを 行わない 点で 異なって います。 塗り潰しを 行わない 分， TMUpdate より 
は 高速です 0 
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プロセス テーブルの 形式は 以下の とおり です 0 


オフセット 

欄 名 

内 容 

+ $00.1 

OFF InWid 

指定した 幅に 収まる 文字 数を 求める ルーチンの ア ドレス 

+ $04.1 

OFF Width 

文字列の 幅を 求める ルーチンの ア ドレス 

+ $08.1 

OFF Draw 

文字列の 描画 ルーチンの ア ドレス 

+ $0c.l 

OFF UpDt 

指定され た 範囲の 描画 ルーチンの ア ドレス 
(背景 色での 塗り潰し 付き） 

+ $10.1 

OFF 一 UpDt2 

編集 履歴に よる 再 描画 ルーチンの ア ドレス 

+ $14.1 

0FF_UpDt3 

指定され た 範囲の 描画 ルーチンの ア ドレス 
(背景 色での 塗り潰し なし） 

+ $18.1 

0FF_Rev 

セレ ク ト 部分の ハイ ライ ト 表示 ルーチンの ア ドレス 

+ $lc.l 

OFF Scroll 

テキス ト エディット レコ ー ドの スク ロール 処理 ルーチン 
の アドレス 

+ $20.1 

OFFScrollR 

指定され た 範囲の スクロール 処理 ルーチンの ア ドレス 

+ $24.1 

OFFFillR 

指定され た 範囲の 塗り潰し ルーチンの ア ドレス 

+ $28.1 

0FF_CLIP 

マウスに よる セレ ク ト 処理 ルーチンの ア ドレス 

+ $2c.l 

0FF_Caret 

キヤ レッ ト 描画 ルー チンの ア ドレス 

+ $30.1 

OFF 一 DrEOF 

テキス ト 終端の 描画 ルーチンの ア ドレス 

+ $34.1 

0FF_Str 

文字列 挿入 ルーチン （表示は しない） の アドレス 

+ $38.1 

OFFSel 

セレ ク ト 部分の 変更 ルーチンの ア ドレス 

+ $3c.l 

OFF_FillRL 

1 行 単位の 塗り潰し ルー チン （イ タリ ック 対応） のア ドレス 

+ $40 


システム 予約 （4 ロング ワード） 


それぞれの ルーチンが' 満たすべき 仕様 だけを 示す こ とに します。 


く ライブラリでの み サポート される もの > 

•TMEventW 

$ A 31 〇 TMEvent と 同様な 处理を 行います が， その 前に アップデート リージョンへの 再 
描画を 行います 0 テキス ト エディ ット レコー ドに 収められ ている グラフ ポートが ウィンド ウレ 
コードの 一部で ある と イ反定 して 処理を 行います。 

具体的には， アップデート リ ージョ ン とクリ ッ プリ ージョ ンが 重なった 範囲を 再 描画し， アッ 
プデー トリー ジョ ン から 除いた 後で， TMEvent を 呼んで います 0 
•TMUpDateExist 

アップデート リージョンと タリ ッ プリージ ョンが 重なった 範囲を 画し， 指定に よっては 
その 範囲を アップデート リージョンから 除きます。 テキス ト エディッ ト レコー ドに 収められて 
いる グラフ ポートが ウィンド ウレ コー ドの 一部で あ ると 仮定し て处理 を 行います。 

編集を 行った ときに， スクロール カ ? 発生す る 場合が あります が， このと きに アップデート さ 
れ ていない 領域が 残って いると， その後， 正常に アップデートで きなくなります。 そのため， 
スクロールが 発生す る 可能 注の ある 編集を 行う 場合は， あらかじめ， この TMUpDateExist 
を 呼び出して， アップデートされ ていない 部分を 再 描画して おく ようにして くた ^ さい。 


プロセス テーブルの 拡張 


I 2 3 4 5 6 78 9 丨 丨 丨 

/(\ /(\ /(\ /f\ / \ / \ / \ /[\ /fv /l\ /IN /(\ 


13 14 5 16 
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(1) OFF InWid : 指定した 幅に 収ま る 文字 数を 求める ルーチン 


ハ 0 ラ メータ （ AO).l 

テキス ト エディット レコードへの ハン ドル 

4( A 0 ).l 

文字列への ポインタ 

8( A 0 ).l 

文字列の 先頭からの オフセット 

$ c ( AO).w 

文字列を 収める 幅 （ドッ ト 数） 

$ e ( AO).w 

文字列の ローカル 座標ー デイ ステ イネ ー シヨ ンレク タング ルの オフ 

セット 値 

返り 値 D 0.1 

文字列の バイト 数 

AO . l^O 

改行 コードに よ り 終了した 

= 0 

それ 以外 


指定され た 幅に 収まる 文字列の バイ ト 数を 返します。 


(2) OFF width : 文字列の 幅を 求める ルーチン 


ハ 0 ラ メータ （ AO).l 

テキス トエ デイ ッ トレ コー ドへの ハン ドル 

4( A 0 ).l 

文字列への ポインタ 

8( A 0 ).l 

文字列の 先頭からの オフセット 

$ c ( A 0 ).w 

文字列の バイト 数 

$ e ( A 0 ).w 

文字列の 口 ー カル 座標ーデイ ステ イネ ー シヨ ンレ クタ ン グルの オフ 

セット 値 

返り 値 D 0.1 

文字列の 幅 （ドット 数） 


指定し た 文字列が 占 める 幅を 返します。 

(3) OFF Draw: 文字列の 描画 ルーチン 


パラメータ 

( AO).l 

テキス ト エディット レコ ー ドへの ハン ドル 


4( A 0 ).l 

文字列への ポインタ 


8( A 0 ).l 

文字^の 先頭からの オフセット 


$ c ( A 0 ).w 

文字列の バイト 数 


$ e ( A 0 ).w 

文字^の 口 一カ ル 座標ー デ' イ ステ イネ ーシ ヨン レ クタ ン グルの オフ 

セッ ト値 


$10( A 0 ).w 

0 以外を 指定す ると， タ ブ 描画 時に 背* 色で 塗 り 潰しを う 

返り 値 

D 0.1 

リザ ノレ ト コード 


指定した 文字列を 描画し ます。 クリップ リージョンは 設定され ています 。 teDrawMode 
を 参照して， モードに あわせた 描画を 行って ください。 
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(4) OFF UpDt : 指定され た 範囲の 描 11 ルーチン （背景 色での 塗り潰し 付き） 

ハ 0 ラ メータ （ AO).l テキス トエデ イット レコードへの ハンドル 

4( A 0 ).l 再 表^す る 範囲を 意味す るレク タング ノレ レコードへの ポインタ 

返り 値 D 0.1 リザルト コード 

指定 さ れた 範囲を 背景 色で 塗 り 潰して か ら再 します。 以下の 牛の もと で 処理を 行って 
ください 。 

• ドロー レベルが 負の 場合は 描画を 行わない 
• カーソルを 消す 

• ビュー レク タング' ノレ， タリ ップ リージョンの 重なりを 言十算 する 

•ハイ ライ ト 表示 属 14 が オンの 場合， セレクト 部分の ハイ ライ ト处; 理^ レー チンを 呼び出して 
ハイ ライ ト 表示を 行う 

• teDrawMode を 参照して， モードに あわせた 描画を 行う 

(5) OFF _ UpDt 2 : 編集 履歴に よる 再 描画 ルーチン 

ハ。 ラ メータ （A0)1 テキスト エディッ トレ コードへの ハンドル 

4( A 0 ).l 編集 履歴 レコードへの ポインタ 

返り 値 D 0.1 リザルト コード 

編集 履歴に したがって 描画を 行います。 OFFJJpDt と 同様な 条件の もとで 描画を 行って 
くださ い。 

(6) OFF _ UpDt 3 : 指定され た 範囲の 描画 ルーチン （背景 色での 塗り潰し なし） 

ハ 0 ラ メータ （ AO).l テキス ト エディッ トレ コードへの ハンドル 

4( A 0 ).l 再^^す る 範囲を 意味す るレク タング、 ルレ コードへの ポインタ 

返り 値 D 0.1 リザ' ル ト コード 

指定され た 範囲を 背景 色で 塗り潰さずに 画します。 OFF_UpDt と 同様な 条件の もと 
で 描画を 行って ください。 


(7) OFF Rev : セレ ク ト 部分の ハイ ライ ト 表示 ルーチン 

ハ 0 ラ メータ （ AO).l テキス トエデ イツ トレ コードへの ハンドル 

4( A 0 ).l 開始 位置 

8( A 0 ).l 終了 位置 

返り 値 D 0.1 リザルト コード 

開始 位置から 終了 位置 までを ハイライト 表示し ます。 ビュー レ クタ ン グル， クリップ リ ージョ 
ンの 重なりを 計算す る 必要が あります 0 ドロー レベル， ハイライト 表^ レベルの どちら かが 負 
の 場合は 描画す る 必要は あり ません。 
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(8) OFF Scroll : テキス ト エディツ ト レコードの スクロール 処理 ルーチン 

ハ 0 ラ メータ （ AO).l テキス ト エディツ ト レコードへの ハンドル 


4( A 0 ).l 水平 方向 ド ット数 

8( A 0 ).l 垂直 方向 ドット 数 

返り 値 D 0.1 リザ ル トコー ド 

指定した ドッ ト数だ け 縦横に スクロールさせます。 次の 条件の も とで 处:理 を 行って ください。 
• ドロー レベルが 負の 場合は 描画を 行わない 
• カーソルを 消す 

•ビュー レ クタ ング ル， クリップ リージ ョ ンの 重なり を 計算す る 

•水平 方向 補正 標， 垂直 方向 補正 標， 水平 座標 ロング、 値， 垂直 座標 ロング 値を » 斤す る 
• 実際の スクロールは 〇 F ^ ScrollR を 呼び出して 行う 
•スクロールの 結果 再 表示が 必要な 場合は 描画が 必要 


(9) OFF ScrollR : 指定され た 範囲の スクロール 処理 ルーチン 

パラメータ （ AO).l テキス トエデ イツ トレ コードへの ハンドル 

4( A 0 ).l スクロールを 行う 範囲を 意味す るレク タング ノレ レコードへの ポ イン 

夕 


スクロール オフセット を 示す ポイント 

再 表示が 必要な 範囲を 意味す るレク タング ルレ コー ドへの ポ インタ 

リザ ノレ ト コード 

リージョン レコード への ハン ドル 

す院 した レク タング ルの 範囲 内を， 指定した ドット 数 だけ 縦横に スクロールさせます 〇スク 
ロールに よって 生じた 空白 部分を 背景 色で 塗り潰し， その 範囲を リージョンに 格納し， A 0 に 
返します。 


8( A 0 ).l 

$ c ( AO).l 

返り 値 D 0.1 
A 0.1 


(10) OFF FillR : 指定され た 範囲の 塗り潰し ルーチン 

ハ。 ラメ— 夕 （A0)1 テキスト エディッ トレ コードへの ハンドル 

4( A 0 ).l 塗り潰しを 行う 範囲を 意味す る レ クタ ング 、ル レコ ー ドへの ポ インタ 

返り 値 D 0.1 リザルト コード 

指定され た 範囲 内を 背景 色で 塗 り 潰します。 


(11) OFF CLIP : マウスに よる セレクト 处 J1 ルーチン 

パラメータ （ AO).l テキスト エディッ トレ コードへの ハンドル 

4( A 0 ).l マウス 座標を 意味す る ポイント 

8( A 0 ).w 0 : 新規 

1： 前回の 選択 位置を 変更 
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2： 開始 位置を 変更 
3： 終了 位置を 変更 

返り 値 D 0.1 リザルト コード 

マウスに よって セレクト 位置を 変更/設定 します 0 デフ オルトでは， 座標を ロング ワードに 
変換して， $ A 33 F TMPointSel を 呼んで いる だけです。 

(12) OFF Caret : カーソル 描画 ルーチン 

パラメータ （ AO).l テキスト エディット レコードへの ハンドル 

返り 値 D 0.1 リザルト コード 

セレクト 位置に 力ー ソルを 表示し ます。 ペン モードは XOR に 設定され ている ので， 同じ 
図形を 描画す る こと で' 表示/消去が 行われ ま す。 クリ ッ プリ ージョ ンは 設定 済みです。 


(13) OFF DrEOF : テキス ト 終端の 描画 ルーチン 

ハ。 ラ メータ （厶〇).1 テキス ト エディット レコードへの ハンドル 

返り 値 D 0.1 リザルト コード 

テキス ト 終端 記号を 描画し ます。 終端 位置に ペン 位置が セットされ ています。 


(14) OFF Str ： 文字列 挿入 ルーチン （表示は しない) 


ノヽ 。ラ メータ 

( AO).l 

テキスト エディツ トレ コー ドへの ハン ドル 


4( A 0 ).l 

文字列への ポインタ 


8( A 0 ).l 

文字列の バイト 数 


$ c ( A 0 ).l 

編集 履歴 レコー ドへの ポインタ 

返り 値 

D 0.1 =0 

選択 部分 も 挿入 文字列 もない 


=1 

編集した 


= - 10240 最大 入力 数を 超える 

=-10239 リード オンリ ー モード 

セレクト 範囲と 文字列を 交換し， 編集 履歴を 言 £1 象し ます 0 カーソル 位置の 再 計算を 行う 必要 
はありません。 キャッシュ や テキストの メモリ ブロックを f 乍 成したり， 行頭 テーブルの 設定を 
行う 等， 複雑な 処理が 要求され ます。 


(15) OFF Sel : セレ ク ト 部分の 変更 ルーチン 


ノ 、。ラ メータ 

( AO).l 

テキス ト エディツ トレ コードへの. 


4( A 0 ).l 

新しい セレ ク ト 範囲の 開始 位置 


8( A 0 ).l 

新しい セレクト 位置の 終了 位置 


$ c ( A 0 ).l 

現在の 新しい セレ ク ト 位置 

返り 値 

D 0.1 

リザ ノレ ト コード 
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セレクト 位置を 指定の 位置に 変更し ます。 新しい セレクト 範囲と， それまでの セレクト 範囲 
の 重なりを 調べ， 〇 FF_Rev を 呼び出して 変更 部分 だけ 反転させます。 テキストの バイト 数 
を 超えた 値の 場合は 補正す る 必要が あり ます。 力ー ソル 位置の 再 計算を 行う 必要は あり ません。 

(16) OFFFilIRL : 1 行 単位の 塗り潰し ルーチン （イ タリ ツク 対応） 

パラメータ （ AO).l テキス トエ デイ ツト レコードへの ハンドル 

4( A 0 ).l 塗り潰す 範囲を 示す レク タング ルレ コードへの ポインタ 

返り 値 DO.L リザルト コード 

指定され た 範囲 内を 背景 色で 塗 り 潰します。 フォント フェイスに イタ リツ クが 指定され てい 
る 場^^は， ネ 旨定 された レク タング ルを イタ リ ックと 同様に 傾けて 塗り潰しを 行います。 



エディ タ 等の 文書を 編集す る 本格的な アプリ ケー シ ヨンを 支援す るた めに， さまざまな ユー 
テイ リ テイ 的な 機能が テキスト マネージャに 追加され ています。 代表的な ものを 列挙して みま 
す 0 


• テキスト 中の 文字列の 前/後方 検索 

•キー入力 関係の ユーティリティ （キー コードの 変換， キーの 先 読み 等) 
• etc . 


このほかに， 些 末な ことです が， SX 1.10 から テキスト エディット 中で ポップアップ する 
メニューが リ ソース MENU の -4096 と して 定義 さ れ ています。 この リソースは 
SYSTEMLB に 収められ ており， $ A 30 A TMInit 内で 読み込まれます。 リソースを 差し 
替える ことによって 内容を 変更す る ことは 可能です が， カット， コピー 等の アイテム 番号は 固 
定 ですから， 表記を 変える 程度の 変更し かで きないと 思われます。 

C _ N | HENWIN . X の 役割と 動作の 仕組 


SX-WINDOW ユーザーズ マニュアルでは， HENWIN.X は 「漢字変換 ウィンドウです j と 
説明され ています が， も う 少し 補足説明を 加えて おきたい と 思います。 

HENWIN . X は， ユーザが 直接 実行す るた めの ファイルではありません。 シェルが 立ち上 
がった 時点で 自動的に 起動し， シェルが 終了す るまで 1 つの タスクと して 動き 続けます。 こ 
の タスクの 役割は というと， キーボードから 文字を 入力 中に フロン ト プロセッサを 起動した 
場合に， 画面 下部に 変換 ウィンドウを 表示し， 変換 過程を 表示す る ことにあります。 この 仕 
事が どのような ものである かは， HENWIN . X を ほかの ファイル 名に リ ネーム したう えで シェ 
ルを 起動して， フロン ト プロセッサを 起動して みた 状態と 比較して みれば よ 〈わかる と 思い 
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ます。 

前著 『 SX-WINDOW 〜』 では， ウィンドウ ID$28 の ウィンドウを 「漢字変換 用」 として 
しまい ましたが， 実際の 変換 ウィンドウは ウィンドウ マネージャを 使わず， グラフ ィッ クマ 
ネー ジャを 用いて 直接 描画した 特殊な ウィンドウ となって います。 

こ の 動作は， DOS コ ー ルの $FF18 hendsp を ト ラップす る ことによって 実現 さ れて いま 
す 0 hendsp は， フロント プロセッサの ための DOS コールで， システム 行に 漢字変換 過程 
や 候補な ど を 表示す る 機能を 持っ ています 0 Human の 用意す る 標準の hendsp の ルーチン 
では， つねに 画面 最下 行に 変換 過程を 表示す るよう になって いますが， これを SX-SYSTEM 
内の ルーチンと 差し替える こ とに よって， SX- WINDOW の デスク ト ップ 上の ウィ ン ドウ 風 
の 領域の 中に 表示 させて い る わけです。 
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2 


タスク マネージャ 


SX - WINDOW で 動作す るすべ ての タスクを 統括す る タスク マネージャの 基本的な 機能に 
は なんら 変更はありません。 バージョンアップした 点と しては， いくつかの 小規模な 変更と, 
ユー テイ リ テイ 的 SX コールの 追加が 挙げられます。 


I モジュール ヘッダの 拡張 

SX1.10 では， モジュール ヘッダの 内容が 拡張され， 次の ような 形式に なって います。 


(I) 

⑵ 


(1 ) モジュール タイプ 

従来の モジュール タイプは 〇 BJR 〇 BJC， 〇 BJO の 3 種類でした が， OBJX とぃう 
新い 、モジュール タイ プが 追加され て ぃます* 5 。 

*5: 標準の システムでは， HD フォー マツ ト . X が X 型の モジュールです。 


オフセット 

内 容 

+ $00.1 

モジュール タイプ 

+ $04.1 

モジュール サイズ 

+ $08.1 

スター トア ドレス オフセット 

+ $0 c.l 

ワーク サイズ 

+ $10.1 
+ $14.1 

コモン エリ ア サイズ 

+ $ lc.l 

システム 予約 


X 型の モジュールは 単独 実行 型と 呼ばれ， シェル 上で 動作し ません 0 実行が 開始され るの 
は， つねに コマンド ラインから 起動され た 場合の エン ト リ ポイント （アセンブラ ソースで .end 
命令に よって 指定した スタート アドレス） からです 0 必要な 場合は， ここで 外部 カーネル 等を 
呼び出して SX-SYSTEM を 初期化し てく ださい。 

シェルから 起動した 場合, Human の プログラムを 実行した とき と同樣 その 時点で 走行して 
いた ほかの タスクには， タスク マネージ ヤイ ベントの 31(SAVE)，33(NOTICEENDTSK), 
1 (ENDTSK) が 送られて 実行の 終了が 要請され， すべての タスクが 終了した 段階で X 型 
の モジュールが 実行され ます。 Human の プログラムと 異なり， モジュールの 動作が 終了した 
際に 「シェルに 戻ります 何 か キーを 押してく ださい！！」 の メッセージが 表示され ず， キーが 
押される のを 待たずに シェルに ネ 复帰 します。 


(2) コモン エリア サイズ 

R 型の モジュールの 場合， プログラム エリアは いくつかの タスクで 共有され ます。 プ ログ 
ラム エリア カす 「プログラム」 + 「固定 データ」 + 「静的な ワーク」 で 成り立って いる ことは， 
前著 『SX-WINDOW〜』 で 説明し ました 力 5 '， このうち の 「静的な ワーク」 も 共有され る こ 
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とはいう まで もありません。 これを うまく 使えば， プログラム エリアを 共有して いる タスク 間 
でかん たんに 情報を 共有し， また， やりとり する ことが 可 能と なります。 

これを 明示的に 行う のが コモン エリアです。 コモン エリアは， プログラム エリアを 共有して 
いる タスクの 数に 関わらず， 1 つの モジュール につき 1 つ 用意され ます* 6 〇 プログラム エリ 
アを 共有す る タスクには， 同じ コモン エリアの 先頭 アドレスが 通知され 同じ 情報へ アクセス 
する ことが 可能です （図 6)。 

*6: コモン エリアを 利用して いる アプリケーションと しては， エディタ . X が 挙げられます。 エディタ. 
父では， 複数の ファイルを 編集して いると き， [ ESC ] + [ E ] です ベての ファイルの 編集 （= 複数 
の エディタ . X ) が 終了し ますが， これは コモン エリアに よって 連絡を とりあって いると 思われ ま 
す 。 

■図 6 コモン エリアの 概念 


R 型 モジュールを 共有 



ワーク エリア 


ワーク エリア 


コモン エリア 


共有 


N 

タスクん’ 


「 n 

1 

共有 

プログラム エリアは 


共有 


1 

ワーク エリア 

ワーク エリアは 別々 

r 

\ 

共有 

\ コモン エリアは 共有 


X タイプの 実行 ファイルの 場合は， 静的な ワークを BSS セクションに 置 〈こ とで フ ァイ 
ル サイズを 節約で きます が， R タイプの 実行 ファイルでは BSS 領域が 用意され ない ので， こ 
の 方法が 使えません。 このような 場合， コモン エリアを 利用す る ことで BSS 領域の かわり 
とする ことができます。 

コモン エリ アが 必要ない 場合は， この 欄には 0 を 入れて おきます。 

[2 起動時の レジスタ 内容の 変更 __ 

コモン エリア を 利用す るた めには， こ の 先頭 アドレス がア プリ ケーシ ョンに 通知され なけれ 
ばな りません。 SX 1.10 では， タスクが 起動され た 際に レジスタ A 4 によって， この 値が 渡 
されます。 A 1 に 収められ ている ワーク エリ アの先 § 頁ア ドレスを 利用 するとき と 同様に， A 4 
を 利用して コモン エリ アに アクセスす るよう にして くだ、 さい 0 

この結果， タスクの 起動時には 各 レジスタに 次の ような 値が 入って いる こ とに なり ます。 
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レジスタ 

内 容 

DO 

自分に 与えられた タスク ID 

DI 

コー ドを 共有す る タスクの ID 

AI 

ワーク エリ アの 先頭 ア ドレス 

A2 

コマン ドラ インの ア ドレス 

A3 

環境の ア ドレス 

A4 

コモン エリアの 先頭 ア ドレス * 

USP 

スタック トップ （ワーク エリ アの 最後 +1) 


(* が 追加/変更 された 欄） 

コモン エリ ア カす 必要ない モジュールの 場合は， A 4 には 0 が 入り ます 0 


タスク 間 通信の 手順の 変更 


SX1.0£lT は， $A35F TSComnmnicate の 不備 （3 者 以上で タスク 間 通信を 行った 場 
合の 混乱 等) を 回避す るた めに， TSSendMes, TSAnswer を ライブラリ として 用意し， そ 
れを 使う ことが 推奨され ていました。 SXL10 では， これらは SX-SYSTEM 内に 統合 さ 
れ ています。 これにより， タスク 間 通信は， $ A 4 r 7 TSAnswer ， $A418 TSSendMes, 
$A419 TSGetMes を 利用 して 行う ことになります。 


タスク 管理 テーブルの 拡張 


タスク 間 通信が 改良/変更， コモン エリアの 追加に より， タスク 管理 テーブルに それらの 情 
報を 格納す るた めの 欄が 追加され ています。 この結果 タスク 管理 テーブルの 形式は 次の よう 
になり ま した。 


オフセット 

欄 名 

内 容 

+ $000 

tsName 

タスク 名 （ ASCIIZ) 

+ $05a 

tsCommand 

コマンド ライン 

(LASCII) • 

+ $l5a.w 

tsTskID 

自分の タスク ID 


+ $1 5c.w 

tsParentID 

親の タスク ID 


+ $l5e.w 

tsStMode 

立ち上げ モード 


+ $160.1 

tsRscType 

リ ソース タイプ 


+ $l64.w 

tsRscID 

リ ソース ID 


+$l66.w 

tsState 

現在の 状態 


+ $168.1 

tsProgramPtr 

プログラム エリ ア への ポインタ 

+ $ 1 6c.l 

tsProgramHdl 

プログラム エリ ア への ハン ドル 

+ $170.1 

tsDaraHdl 

ワーク エリ ア への ハン ドル 

+ $174.1 

tsEnvPtr 

環境 エ リアへの ポインタ 

+ $178.1 

tsD 1 RegKeep 

DI 


+ $l7c.l 

tsD2RegKeep 

D2 


+ $180.1 

tsD3RegKeep 

D3 

タスク 切り替え時の 

+ $184.1 

tsD4RegKeep 

D4 

- レジスタ 退避 用 

+ $188.1 

tsD5RegKeep 

D5 


+ $l8c.l 

tsD6RegKeep 

D6 


+ $190.1 

tsD7RegKeep 

D7 
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(前 ページ 続き） 


オフセット 

欄 名 

内 容 

+ $194.1 

tsAI RegKeep 

Al 


+ $198.1 

tsA2RegKeep 

A2 


+ $l9c.l 

tsA3RegKeep 

A3 


+ $laO.I 

tsA4RegKeep 

A4 


+ $1 34.1 

tsA5RegKeep 

A5 

> タスク 切り替え時の 

+ $la8.l 

tsA6RegKeep 

A6 

レジスタ 退避 用 

+ $ 1 ac.l 

tsAORegKeep 

AO 


+ $lbO.I 

tsDORegKeep 

DO 


+ $lb4.w 

tsSrRegKeep 

SR 


+ $lb6.w 


システム 予約 


+ $lb8.1 

tsSpRegKeep 

USP 


+ $lbc.l 

tsPcRegKeep 

PC 


+ $ IcO.w 

tsCommSendID 

最後に 送信した タスクの ID* 

+ $lc2.w 

tsCommRecvID 

現在 受けて いる タスク 間 通信の 



送信 元 タ スクの ID* 

+ $lc 4.1 

tsTickCount 

起動時の システム 時刻* 

+ $lc8.l 

tsCommonHdl 

コモン エリ ア への ハン ドル * 

+ $lcc 





tsRsv 

システム 予約 


+$lff 





(* が 追加/変更 された 欄) 


タスク マネージ ヤイ ベン トの 拡張 


システム 全体を より 効率よ く， 安全に 使用す るた めに， タスク マネージャから 各 タスク ヘシ 
ス テムの 状況 等を 通知す るた めの メ ッ セージて、、 ある タスク マネー ジャイ ベントに いく つかの 新 
しい イ ベン ト カ 5 ' 追加され ま した。 

追加 された タスク マネージ ャイ ベントに つい て 次 ペー ジの 上表 に 示します。 

デスクトップ スクラップ や ドラッグの データを やりと りする ための セル レコー ドで， 画像 関 
係の 情報を 扱う こ とがで き るよう になり ま した。 


セル レコードに 登録され る データの 種類の 追加 


f 廷 来から 扱う こ とがで きた FS ?? (アイコン 情報 ）， STRN (文科 丨 j 情報） とともに， 次 ペー 
ジの 下表に 示す 情報が 扱 える ようになって います。 従来から の 情報 と あわせて 示します。 


140 


3 タスク マネージャ 


タスク マネージ ヤイ ベン 

イ ベン トの 内容 

ト コード （略称） 

引数 1 

引数 2 

33 ( NOTICEENDTSK ) 

全 タスク 終了の 予告です。 この イ ベン トが 届いた 時点で 終了す る 
と 都合が 悪い タスクは， $ A 358 TSGetEvent で この イベントを 取り 
除いてく ださい。 


0 : X 型 モジュールを 実行 
丨 ： 再起動 

2 : 終了 

0 

70 ( CREATETSK ) 

タスクの 起動を 通知し ます。 


タスク ID 

下記の データへの ハン ドル 
+ $000 タスク 管理 テー ブ 

ルの コ ピー 

71 ( EXITTSK ) 

タスクの 終了を 通知し ます。 


タスク ID 

下記の データへの ハン ドル 
+ $000 タスク 管理 テープ 

ルの コピ ー 
+ $200.1 終了 コード 

91 ( DELETERSC ) 

リ ソースの 削除を 通知し ます。 


リ ソースの タイプ 

リ ソースへの ハン ドル 


情報の 種類 

情報の 内容 

格納 形式 

FS ?? 

(?? は 英字 2 文字) 

アイコン 管理 レコード 

アイコン 管理 レコー ド そのもの 

STRN 

文字列 情報 

文字列 （終端 コー ドは とく に 必要ない） 

PATI 

テキス ト タイプ 丨 ベー 
ジの ビッ トイメ ー ジ 

+ $00 バ ウン ドレ ク タング ル 

+ $08 テキス ト タイプ 1 ページの ビッ ト イメージ 

PAT 2 

テキス ト タイプ 2 ペー 
ジ のビッ ト イメージ 

+ $00 バ ウン ドレ ク タング ル 

+ $08 テキス ト タイプ 2 ページの ビッ ト イメージ 

PAT 3 

テキス ト タイプ 3 ベー 
ジの ビット イメ ー ジ 

+ $00 バ ウン ドレ ク タング ル 

+ $08 テキス ト タイプ 3 ページの ビッ ト イメージ 

PAT 4 

テキス ト タイプ 4 ベー 
ジの ビット イ メー ジ 

+ $00 バ ウン ドレ ク タング ル 

+ $08 テキス ト タイプ 4 ページの ビッ ト イメージ 

mRGN 

マスク 用 リージョン 
データ 

リージョン レコ ー ド そのもの 

PA し 2 

パ レッ ト データ 

パレット 〇〜 15 に 対応す る カラー コー ドを 丨ワー ドず 
つ。 計 16 ワード。 

TXI 6 

パレット デ ー タ 付き テ 
キス ト タイプ 4 ページ 
のビッ トイ メー ジ 

+ $00 バ ウン ドレ ク タング ル 

+ $08 パレット データ 

+ $28 テキス ト タイプ 4 ページの ビッ ト イメージ 


141 


第 2 章 拡張され た マネージャ 


そのほか 


以上の ような 拡張/変更の ほかに， ユー テイ リ テイ 的 機能を 持つ SX コールが 大量に 追加 さ 
れ ています。 従来からの 機能を 利用す るた めの 便宜を はかる ものが 大半です が， 新しい 概念を 
導入して いるもの も いくつか 存在し ます。 これらの 概念に ついて 解説す る こ とに します。 


• SX コー ) U 7)^ クタ 

SX コールを 呼び出す 際， その 番号に 対応す る 理 ルー チンが 砰び 出される わけです が， こ 
のとき， 各 ルーチンの アドレスが 录 されて いる テーブルが 参照され ます 。一般的に， このよ 
う に 参照され る ルーチンの ア ドレスを ベクタ と 呼びます 0 
SX1.02 ま では， SX コ ー ルの ベクタ は 参照す る こと も 変更す る こと もで きませんでした。 
ベクタが 参照/変更 できる こ とで， ユーザは 既存の SX コールを よ り 付加価値の 高い 処理 ルー 
チンに 差し替えたり， バ 、ダを 回避 したりす る こと 力 ? できる ようになります。 

SX1.10 では， ベクタ の 取得/変更を 行うた めに， SXGetVector, $A4£3 
SXSetVector が 用意され ています。 


• FSX の ロック 

SX-SYSTEM を 収めて いる FSX.X は， 必要な 場合には メモリを 広く 使える よう， 常駐 
解除が 可能と なって います。 これは これで 便利では あります が， SX-WINDOW 動作 中に 常 
駐 解除され てし まう 可能 注が あり， その 場合は 確実に 致命的な エラーが 発生し ます。 

SX1.10 では， FSX.X に ロック レベルを 導入し， ロック レベルが 1 以上の 場合は FSX. 
X を 常駐 解除で きないよう にします。 また， 0 以下の 場合は 常駐 角军 除を 許可し ます。 ロック 
レベルを 1 上げる ことを 「ロックす る」， 1 下げる ことを 「アンロック する」 と 呼びます。 

FSX のロッ ク / ア ン ロックを 行う SX コールは， $A42A SXLockPSX, $A4£B 
SXUnlockPSX です 0 


• 画囬モ ― ドへの 対応 

グラフ ィ ック マネージャが 多様な 画面 モードに 刘 ■応 したのに と も なって， すべての マネー 
ジヤの 元締めで も ある タスク マネー ジャの レベル （= シェルの レベル） でも 画面 モードの 設定 
に刘 •応 する よう になり ま した。 $A 430 TSSetGraphMode を 利用す る こ とに よって， SX- 
WINDOW が SW 乍す る 画面 モー ドを 設定す る こと が'^！ 能です。 

TSSetGraphMode では， IOCS の $10 CRTM0D で 指定す るのと 同様な 数値に よっ 
て 画面 モードを 指定し ます。 この 値は SRAM に 記録され， タスク マネージャが 初期化され 
る 際に 参照され て グラフィック マネージャに 通知され ます。 これに よって， 以降， グラフ ィッ 
ク マネージャは 画面 モードに 適した 描画を 行う こ とがで きます。 

さらに， TSSetGraphMode では， 画面 モードと 同時に 「実 画面 モード」 にす るか どう 
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かの 設定を 行います。 実 画面 モードを 説明す る 前に， X 68000 の 画面の 構造に ついて おさら 
いして おき ましよう。 

X 68000 の 画面の 大きさ と グラフ ィ ック /テキスト VRAM の 大きさは， かならずしも 一 
致して いません。 たとえば， 画面 モード $10， 「768 X 512 ドット， 16 色 グラフィック 画 
面 1 ページ， 31 kHz 」 の モードでは， 実際に ディスプレイ 上で 見る ことができる 領域は 768 
X 512 ドッ トです が， VRAM は 1024 ： X 1024 ドッ ト分 用意され ています。 前者を 表示 画 
面， 後者を 実 画面と 呼びます。 表示 画面と 実 画面の 関係を 図に すると， 図 7 のように 表現で 
きます。 


■図 7 表示 画面と 実 画面の 問 係 



768 ドット 


512 ド 、 

ント 




面 


1023, 1023 


実 画面 モードは， 表示 画面の 大きさに 関係な く， 実 画面 全体に 描画を 行う モードです。 実 画 
面 モードで ない 場合は， 表示 画面の 大きさの 範囲 内に のみ 描画を 行います。 この 機能は シェル 
にも 反映され ていて， 15 ページの コラムに 示した ように， シェル 起動時に 画面 モードを 指定 
できる よう になって います。 

実 画面 内の どの 部分を 表示 画面と して 表示す るかは， CRTC の スクロール レジスタを 操作 
する ことによって 決める こと 力 ? できます。 これを 利用して， 実 画面 モードに 設定した うえで， 
マウス ポインタの 位置に あわせて 表示 画面の 位置を 操作す る プログラム さえ 用意 すれば， 実 画 
面 全体を 広く 利用す る こと 力呵能 となります。 

COLUMN | SRAM の 内容 

SX-WINDOW では， 環境 データの 一部を SRAM に 格納して います。 

現時点では， SRAM の システムが 使用す る 領域 （SEDOOOO—SEDOOFF) の 一角， $ED 
007£~$ED007E を 使用して い ます。 こ の 領域に 収めら れて いる 情報の 形式は 以下のと お 
りです。 


143 


第 2 章 拡張され た マネージャ 


$ ED 0072 .w 固定 文字列’ SX ’ 

$ ED 0074 .b ダブル クリ ックの 基準 時間 +丨0 

$ ED 0075 .b マウス スピード + 2 

以下は テキス ト パレ ッ トの 設定。 HSV 方式を もとに 格納され ている 
$ ED 0076 .b 色相 （パレット 〇〜 3 共通） 

$ ED 0077 .b 彩度 （パレット 〇〜 3 共通） 

$ ED 0078 .b 1 パレット 〇〜 3 の 明度が 5 ビッ トず つ 格納され ている 

$ ED 0079 .b I 形式は 

$ ED 007 A.b J $ ED 0078 $ ED 0079 $ ED 007 A 

000001 1 1 1 1222223 3333 xxxx 

$ ED 007 B.b 使用す る プリンタ ドライバ PRTD の ID (下位 バイ トの み） 

$ ED 007 C.b bit 7 〜 bit 4 SRAM 情報の バー ジョン 

bitl 画面 状態 保存 モード 

bitO スター ト 画面の 保存 モード 

$ ED 007 D.b デスク ト ップの 背景を 収めた PICT の ID (下位 バイ トの み） 

$ ED 007 E.b 画面 モード 

bit 7 I 

bit 6 実 画面 モード 

bit 5 〜 bitO 画面 モー ドを 意味す る 数値 


col 酬 | SYSDTOP.SX のフ オー マツ ト 

SYSDTOP.SX は， シェルが 管理す る デスク ト ップ 上の 状態を 保存して おく ための フ アイ 
ルです。 システム アイ コンの 中の 「スタート 画面 設定」 を. 「する」 に 設定す る こ とで， シェ 
ルが 終了し た 時点での 状態が 保存 さ れ ます。 

フ アイ ルの 形式は 次のと おり です 0 


+ $00 .b 実 画面 モード フラグ （ bit 7 はつねに 丨） 

+ $0 l.b 画面 モード 
+ $02. w タスク 情報 

+ $00 .w タスクの 数 （ nt ) 

+ $02 I 個 目の タスク 情報 
($ l 6 e バィ ト） 

+ $00 タスク 名 （ ASCIIZ ) 

+ $5 a コマンド ライン （ LASCII ) 

+ $153.1 ウィンドウ コンテンツの 左上 ポイント （ローカル 座標） 
+ $ l 5 e.l ウィン ドウ コンテンツの 右下 ポイント （口ー カル 座標） 
+ $162.1 グローバル 座標への オフ セッ トを 意味す る ポイント 

+ $ l 66 .b model 

+ $167 . b mode 2 

+ $168.1 リソース タイプ 

+ $ l 6 c.w リソース ID 


+ ( nt *$ l 6 e ) +4 アイコ ン 情報 
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+ $00.1 アイコンの 個数 （ ni ) 

+ $04 丨個 目の アイコン 情報 

+ $00 .b ユニット 番号 

+ $01.5 メディア バイト 

+ $02.1 アイコ ンの 左上の ポ イン ト 


2 4 | 

その ぼかの マネー ジヤ 

以上の マネージャ 以外で も， 小さな 変更， 追加が 行われて います。 キーボード マネージ ャ， 
リソース マネージャ， ウインドウ マネージャ， メニュー マネージ ャ， コン ト ロール マネージ ャ 
で， 比較的 目につく 変更 点に ついて 解説し ます。 

卜 

キ ー ボ ー ド マネ ー ジャ 


キー ボー ド マネージャ のフラ グの 内容が 一部 変更に なって います。 

SX 1.0 E まで， フラグ Halt は キー データを 利用す るか 利用し ないかを 決める ための フラ 
グで したが， 意味が 変更され， これが 011 (=1) になって いる 場合は， ショートカット キー 
として [0 PT .1] の ほかに [ XF £] が 使える ようになります* 7 。 

*7: キー ダウン イベントの 際の シフ トキー 情報で， [XF2] が 押されて いると きに [0PT.I] に 該当する 
ビット を 立てる よう になり ます。 


フラ グ 類を 直接 操作/変更す る 機能は いままで 用意され ていませんでした 力％ $ A 09£ 
KBFlagGet , $ A 093 KBPlagSet によって， そ れが 可能 となりました。 これらの SX 
コールでは， 1 ロング ワードの 各 ビットに フラグの 内容を 割り当てた 値が 使われます。 各ビッ 
卜とフ ラ ダの 関係は 次のと おり です。 


bitO 

Halt 

bitl 

ResetOn 

bit2 

OldOn 

bit3 

Led On 

bit4 

ClickOn 

bit5 

RepeatOn 

bit6 

AssignOn 



リソース ▽ネー ジヤ 


リソース マネージャには， 次の 3 つの SX コールが 追加され ました。 いずれも リソースの 
使用 状況を _ する ための SX コールです 0 


•$ A 0 ED RMResLinkGet 

指定した リ ソース マップの 次の リ ソース マップへの ハンドルを 得る。 

•$ADEE RMResTypeList 

指定した リソース マップに 登録され ている リ ソース タイプの 一覧を 得る。 

•$ A 0 EF 闩 MResIDList 

指定 した リソース マッ プ 中の， 指定 した タイプの リソースの ID の 一覧を 得る。 



4 そのほかの マネージャ 



ウインドウ マネー ジヤ 



従来から 用意され ていた SX コール も， サブ ウィンドウとの 関係から 一部の 機能が 拡張 さ 
れ ています。 す旨定 した ウィンドウを アクティブに する $A1FE WMSelect には， サブ ウィ 
ン ドウ リス ト カ、 ら サブ ウ ィン ドウ を 外す 機能が 追力卩 されて います （サブ ウ ィン ドウ マ ネー ジヤ 
の 項を 参照)。 また， SX1.02 では 未 公開であった $A1FF は， サブ ウィンドウ リストを 操作 
しないで 同» な 処理を 行う WMSelect2 として 公開され ました。 

SX コールの 追加/変更 以外では， 新しい ウインドウの 種類が 1 つ 追加され ています 。ウィ 
ン ドウ ID$31 (49) の， この ウインドウ （図 8) は， 標準 ウインドウ とよく 似て います 力す， 
次の 点で 異なって います。 


•ウインドウ アイテムと しては， クロ ー ズ ボタン， ス クロ ー ノ レノ 1 ^ 一 ， サイズ ボタンを サポ ー ト 
•タイ トルバ ーの タイ トルを 表示す る 部分が 広い 
■図 8 ID$31 の ウインドウ 



むしろ， グラフィックを サポート する ID$32 (50) の ウィンドウから， グラフ ィッ クのサ 
ポートを 取り除い たもの， と 考えた ほうがよ いか も しれません。 

この ウインドウは， 新しい” コント ロー ル . X ” で 使われて います。 



メニュー マネー ジヤ 



メニュー レコードの 作成を 補助す るた めの SX コール， $A£69 MNConvert が 追加！ され 
ました。 この コールでは， ある 一定の フォーマットで 書かれた メ ニュー 定義 用の ASCIIZ 文 
字 列を 解析し， その 内容に したがって メニュー レコードを 作成して く れ ます。 

メニュー 定義 文字列は， 基本的に メニュー アイ テムを 1 つず つ カンマで 区切った ものです 
が， 特殊 文字を 利用す る ことによって， ショートカット や チェック マークの 指* 定を 行う ことが 
できます。 

特殊 文字には 次の 3 つが あ ります。 
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特殊 文字 

内 容 

1 

ショー ト カット 文字の 指定。 次の 丨 文字が シ ョー ト カット 文字と なる 
この 文字で 始まる アイテムは イン アクティブ となる 
チェック マークを つける 


たとえは' 


" ITEM 1, " AITEM £, ITEM 3 JITEM 4" 

という 文字列で あれば， 図 9 のよう な メニューを 表示す る メニュー レコードが 作成され ます。 
■図 9 作成した メニューの 表示 例 



コン ト ロ ー ル マネ ー ジヤ 


コントロール マネージ ャ には， コント ロ— ル オプション， ユーザ' 用の ワーク エリア， ドラ ッ 
グ 中に 呼び出される 関数の アドレス， そして 定義 閨 数の データな ど， コントロール レコー ドの 
中の 値を 参照/設定 する ための SX コールが 追加され ま した。 
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121 

サンプル プログラム 

I 本章で 示した ような SX 1.10 の 拡張/変更 点を 利用した サンプル ブロ グラムを つくって みま 
1 した。 


プログラムの 仕様 


プログラム GRPSMPL は， データを 与える こ とに よって 円グラフを f 乍 成します。 
データは テキス トフ アイ ルで， 


< 角度 >， < 欄 名 >0 

の 形式で 1 行ず つ 各 欄の 要素を 書いて ぉきます。 各 要素は， 円グラフ 中の く 角度〉 で 示され 
る 扇 型と して 色分けして 表現され ます。 

角度は 〇〜 360 の 10 進 文字列， 欄 名は 16 バイト 以内の 文字列で 表現 します。 全 要素の 
角度の 合計が 360 度に なれば 完全な 円グラフになる わけです 力 5 ', とく に 値の チェックは 行っ 
ていません。 要素の 数は （表 i 見で きる 色の 関係から* 1 ) 15 個までで す。 

*1: もちろん， ペン パターン などを 駆使す る ことによって， より 多くの 要素を 表現で きる わけです が， 
サンプル という 性格 上， そこまで 行う 必要は ない と 判断し ました。 

ファイルの 名前を コマンド ラインて '指* 定す るか， ファイルの アイ コンを ウイ ン ドウ 中に ド 
ラッグし てく る ことによって データを 与えて ください。 

ウィンドウ 中の ボタン [クリップ ボードへ] を クリック すると， ウィンドウ 中に 表示され て 
いる グラフの イメージと パレ ッ トカ ? デスク ト ップ スクラップに 転送され ます。 これらの 情報は 
Easypaint 等で 利用す る こと がで きます 0 
次の ような ファイルを 与えた 場合， 150 ページの 図 1 のよう な 表示が 行われます。 

30. X 68000 (初代） 

30 ,ACE 
35. ACB-HD 
30 , PRO 
32, PRO-HD 
30 , EXPERT 
38. EXPERT-HD 
18. PR 02 
20, PRO£-HD 
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£6,EXPERT2 
28,EXPERT£-HD 
10, SUPER 
15, SUPER-HD 
10, XVI 
8,XVI-HD 

(この データは サンプルであって 根拠が ある ものでは あり ません) 
■ 図 1 GRPSMP し X の 表示 例 



Easypaint を お持ちの 方は， デスク ト ップ スクラップから イ メー ジとパ レッ トの ペースト 
力 河 能で ある ことを? 鶴 忍して ください （図 幻。 

■ 図 2 Easypaint との 連係 



150 



5 サンプル プログラム 


プログラムの 説明 


この プログラムで 使用して いる SX 1.10 の 新しい 機能には， 次の ような ものが あります。 


• ID$32 の ウインドウ 

グラフ ィッ > を サポート する 新しい ウィンドウを オープンし， 利用して います 
( GRPSMPL.S : £58 - £69 行) 。 

この種の ウィンドウで グラフ ィ ック タイプの ビットマップを 扱う 場合， グラフ ポート 先頭の 
ビッ ト マップ レコードを テキスト タイプ—^ グラフ イ ック タイプに 切り替える ことで， ウイン 
ドウ 内部への 描画を テキスト VRAH グラフ ィ ック VRAM に 振り分ける こ とが 可能です。 
その 際の 手順を 参考に してく ださい （ GRPSMPL.S : 289 〜 30 326, 350 〜 357， 368 
行” 2 〇 

*2: ビッ ト マップの 切り替え をよ り エレ ガン トに 行いたい 場合は， $AIC6 GMExgBitmap を 利用す る こ 
と を おすすめ します。 


• 円弧 （Arc) の 描画 

いうまでもな いこ とです が， 円グラフの 描画には 円弧の 塗り潰しを 利用して います 
( GLPSMPL.S : 522 〜 5£6 行 )〇 

• ピッツの 利用 

描画し た 円グラ フの イメージから セ ルに 収める データ を 作成す るた めに， ピッツ を 利用して 
います （ GRPSMPL.S : 600 〜 670 行)。 

セルの PAT 4 形式は テキス ト タイ プ のレク タング ルイ メー ジで すが， GRPSMPL では 
グラフ ィ ック タイプの ビッ ト マップへの 描画を 行って います。 この 描画で 得られる イメージは 
グラフィック タイプで すし， その イメージに しても， 直接 VRAM を 参照して 得る のは スマー 
卜な 方法とは いえません。 そこで， 描画の 手順を スクリプトに 言 £1 录 して おき， それを 画面に 描 
画する 場合は グラフ ィ ック タイプの ビッ ト マップに， セルの データを 作成す る 場合は テキス ト 
タイプの ビッツ にす 苗 画して います。 これにより， ビッツ 内には セルの デ' ータの 元と なる テキス 
ト タイプの イ メージ が' 成される ことになる わけです* 3 。 

* 3 : $A 丨 BB GMTransImg を 利用す る ことによって， 異なる タイプの ビット イメージ/ピッツ 間で イ メー 
ジの やりとり をす る ことができ ますが， ここでは 再 表示の 容易 さ 等の 関係から スクリプト を 利用 
しています。 

ビッツ 中に スクリプト を 描画す るた めに， ピッツと 結び付けら れた グラフ ポート を 作成して 
いる 部分 も 参考に してく ださい ( GRPSMPL . S : 593 〜 59& 611 〜 619， 672 〜 675 行)。 
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. text 

dc. I 
dc . 丨 


OBJR 


ma in-mdhead 
WORKSIZE+STKSIZE 
0 , 0 . 0 . 0 


. xref _INIT,_TINI 
. xref IDLE 

• xref MS L DOWN, MSLUP, MSRDOWN. MSRUP 

. xref KEYDOWN.KEYUP 
.xref UPDATE, ACTIVATE 

. xref SYSTEM!, SYSTEM2, SYSTEM3, SYSTEM4 

. include WORK. INC * ワーク エリアの 内容を 

* 定義す る ファイル 


* コマンド ライ ン から 


12 

13 

14 

15 

16 

17 

18 

19 

20 

21 mdhead : 

22 
23 


24 

25 

26 

27 

28 DiXstart: 


• セルの 新 タイプ PAT 4 と PA し 2 

デス ク トップ ス クラ ッ プに 画像 データと パレット データ を 収める ために， 新 タイプ PAT4 
と PAL£ を 利用して います （GRPSMPL.S:626 〜 666 行)。 

セル リス ト 格納 用の 再 S 己 置 可能 ブロック を 作成し （GRPSMPL.S : 633 〜 636 行)， その 
中に タイプ 名 PAT4， PAT4 の サイズ， バ 、ウン ドレ ク タング ノレ， そして ビッツ 内の テキスト 
タイプ イメージを 格納し ます （GRPSMPL.S : 640 〜 649 行)。 続いて， タイプ 名 PAL 之 
PAL2 の サイズ， パレット データ を 格納し （GRPSMPL.S : 651 〜 657 行)， こ の ブロ ッ 
クを デスクトップ スクラップに 収めて います （GRPSMPL.S: 659 〜 662 行)。 スクラップ 
へ 転送した 後は， セル リスト を 収めた ブロ ックは 不要になる ので， 廃棄し ます (GRPSMPL.S : 
664 〜 666 行)。 


プログラム リス ト 


この プログラムの 場合， コマンド ラインから ファイル 名を 受け取る ために， スケルトンの 一 
部に 手を 加えて あります （SKELTQN.S :78 行)。 実行 ファイル 作成の 際は 注意して 〈ださ 


リスト 1 に SKELTON . S , リスト 2 に WORK . INC ， リスト 3 に GRPSMPL.S を 
示します。 また， リスト 4： に 実行 ファイルを 作成す るた めの makefile を 示します。 

■リスト 1 GRPSMP し 用 SKE し TON.S 


SX-WIND0W 

GRPSMPL 

スケルトン 


. include 
. include 


D0SCALL. MAC 
SXCALL. MAC 


c c c 
d d d 


ズ ッ 
イ セ 
1 サ フズ 
ダの オィ 
ッ ア合 スサ 
へ ルリ 場 レの 
ル I エのー ドア 約 
I ュ厶ル い アリ予 
1 ジラィ な トエ厶 
ジモ グァが I クテ 
モ型 □フ味 夕 I ス 
1R プ W 意 スワ シ 
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29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 d exec 1 1 : 

55 

56 

57 

58 mes execerr : 
59 一 

60 

61 shname : 

62 

63 

64 

65 

66 

67 comm : 

68 
69 


* 起動した 場合 
* ここから スター トする 


lea 

64(a1) f al 

* ここから スター トする 

move. 1 

a 1， sp 


lea 

16(a0), aO 


sub. 1 

aO, al 


move. 1 

al, - (sp) 


pea 

(aO) 


DOS 

JETBLOCK 

* 専有 メモリを 縮小す る 

c 1 r. 1 

- (sp) 


pea 

comm (pc) 


pea 

shname (pc) 


move, w 

H2, -(sp) 


DOS 

_EXEC 

t デバッグ 用 力ー ネルの 

c 1 r. 1 

- (sp) 

* パスを サーチす る 

pea 

comm (pc) 


pea 

shname (pc) 


c! r. w 

-(sp) 


DOS 

_EXEC 

* デバッグ 用 カーネルを 

tst. 1 

dO 

* 立ち上げる 

* 正常に 柊 了した 場合 

bpl 

p_exec i l 

* そのまま 柊 了 

pea 

mes execerr (pc) 

* エフ ー メッセ ー ジを 

DOS 

_prTnt 

* 表示す る 

DOS 

.EXIT 

"冬 了 

• data 

dc. b 

• カーネルの 起動に 失敗し ました！！ ド， 13, 10, 0 

. even 

dc. b 

• SXKERNEL. X -K -R7 -L ド， 

0 * カーネルの 名前 


. even 


. bss 




ds. b 

258 

* 

力ー ネルは ここから 先の 




コー ドを 読み込み、 



本 

タスクと して 立ち上げる 

. text 




movea. 1 

al, a5 

本 

本 

SX-SHELL から 起動した 場合 
ここから スター トする 

move. 1 

a2, cmdL ine (a5) 



move. 1 

a3, envPtr (a5) 



c 1 r. w 

- (sp) 



pea. 1 

name (a5) 

幸 

n ここが 標準と 違う# 翁 

pea. 1 

winRect (a5) 


pea. 1 

(a2) 



SXCALL 

$A3EA 

* 

TSTakeParam 

lea. 1 

14 (sp), sp 

* 

コマンド ラインを 解析し 、. 

move, w 

dO, paramFI g (a5) 

本 

オ プショ ンを 得る 

bsr 

_INIT 

本 

アプリケーションの 初期化 

bmi 

_ex i t 

拿 

本 

初期化 時に エラ ーが あれば 
柊 了 
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第 2 章 拡張され た マネージャ 


* メイ ン ループ 


* _ TSEventAva i I 
* イベントを 得る 


* イ ベン トコー ドに よって 
* 分岐す る 


* 12 システム イベント 1 

* 13 システム イベント 2 

* 14 システム イベント 3 
* 15 システム イベント 4 


* [ 終了す る ] 

* アプリ ケー ショ ンの 

* 終了 処理 


t TSExit 


SX-WINDOW 

GRPSMPL 

ワーク 定義 用イ ン クルード ファイル 


cmdL i ne : 


= 2*1024 

ワークの 内容の 定義 
. offset 0 


スタック サイズ 


コマンド ライ ンの 


88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 
109 


loop: 


move, w f ff t eventMask (a5) 


event I ab 1 1 


120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 


DAMMY: 


exit: 


pea 

move, w 
SXCALL 
addq. I 
lea 

move, w 
and. w 
add. w 
move, w 
jsr 
tst. I 
bmi 
bra 


dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 
dc. w 


rts 


bsr 


eventRec (a5) 
eventMask (a5) , - (sp) 
$A357 
在 6, sp 

eventTab I e (pc) , al 
eventRec what (a5) , dO 
H15, dO 
dO, dO 

(al, dO. w), dO 
(al, dO. w) 
dO 

_ex i t 
loop 


IDLE-eventTabl e 
MSLDOWN-eventTable 
MSLUP-eventTabl e 
MSRDOWN-eventTable 
MSRUP-eventTab I e 
KEYDOWN-eventTable 
KEYUP-eventTable 
UPDATE-eventTabl e 
OAMMY-eventTabl e 
ACT I VATE-eventTab I e 
DAMMY-eventTabl e 
DAMMY-eventTab I e 
SYSTEM 卜 eventTabl e 
SYSTEM2-eventTab I e 
SYSTEM3-eventTabl e 
SYSTEM4-eventTable 


一 TINI 


move, w dO, - (sp) 
SXCALL $A352 


. end 


DiXstar 


■リスト 2 GRPSMPL 用 WORK.INC 


ン ンンン トトン 
卜べ ベべ ベン ンべ 
レン イイ イイべ ベイ 
7; ベン プンプ ィィ ト 
一ー ィゥ ッゥ ッンプ | 
r - ル ダァダ ァゥッ デ 
D 7 ド ト ト ト ト ダァプ 

电 イ フフ イイ I I ッ 
^ アレ レラ ラキ キア 

- — 2 3 4 4 6 t C 


ン 

ベ 

V 


X 

イ 

テ 

ク 

ア 


U 〇 <1 2 3 


154 


5 サンプル ブロ グラム 


14 

15 envPtr : 

ds. 1 

1 

16 

17 name : 

ds. 1 

1 

18 

19 winRect : 

ds. b 

90 

20 

21 paramFIg: 

ds. 1 

2 

22 

23 eventRec : 

ds. w 

1 

24 eventRec 

what : 


25 

ds. w 

1 

26 eventRec 

whom! : 


27 

ds. 1 

1 

28 eventRec 

when : 


29 

ds. 1 

1 

30 eventRec 

whom2 : 


31 

ds. 1 

1 

32 eventRec 

what2: 


33 

ds. w 

1 

34 eventRec 

task 1 D : 


35 

36 eventMask 

ds. w 

1 

37 

38 task 1 D: 

ds. w 

1 

39 

40 winPtr: 

ds. 1 

1 

41 

42 

43 wi nAct i ve 

ds. b 

$72 

44 

45 

46 b i tmapRec 

ds. w 

1 

47 

48 ctr 1 Hdl : 

ds. b 

$16 

49 

ds. 1 

1 

50 rgnHdl : 

51 

ds. 1 

1 

52 scr i ptHd 1 

53 

ds. 1 

1 

54 bitsMdl: 

55 

56 

ds. 1 

1 

57 ang 1 eL i s t 

58 

ds. w 

15 

59 tagList: 

60 

ds. w 

16*15 

61 

62 

63 WORKSIZE: 

64 




ネア ドレスを 
* 保存す る ワーク 
* 環境の ア ドレスを 
* 保存す る ワーク 

* コマンド ラインで 指定され た 
* ファイル 名が 入る バッファ 
* ウィンドウ レク タング ル 
本 レコ ー ド 

本 コマンド ライ ンの 

* 解析 結果を 示す 
* フラグ 

* イ ベン ト レコー ドの 先頭 
本 イベント コード 

* 第 1 引数 
* イ ベン ト 発生 時 
* 第 2 引数 


* タスク マネージャ 
t イベントの 種類 

* 送り手の タスク 丨 D 
本 イ ベン ト マスクを 
* 保存す る ワーク 

拿 タスク 丨 D を 保存す る ワーク 

拿 ウィン ドウ レコ ー ドを 

* 作成す る 場所 


* アクティブ フラグ 


* グラフ ィ ック タイプの 
* ビッ ト マップ 
* レコードを 収める 場所 

本 コン ト ロー ルレ コード 
t への ハン ドル 

* 汎用 リージ ヨ ン への 

* ハン ドル 

* スクリプトへの ハンドル 
t ピッツへの ハン ドル 


* 角度の リス ト 
* 欄 名の リス ト 


* ワークの 終了 
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WORK. INC t ワーク エリアの 内容を 

* 定義す る ファイル 

* カラー コード 変換 用 マクロ 
ll) + (R. shl. 6) + (B. shU)+l 


本 ウィン ドウ オプション 
* ウィン ドウ 初期 x 
* ウィンドウ 初期 y 


include 


macro R, 6, B, I 
dc. w (6. shl. 

endm 


• text 


別 000 
320 
200 


moveq HO, dO 
rts 


* [ アイ ドル イベント ] 


* [ レフ ト ダウン イベント】 

(a5) , a0 

* 自分の ウィン ドウ 上で 
* 発生した か？ 

* 違うなら MSLD9 へ 


moveq 

rts 

HO, dO 

move. 1 

eventRec_whom1 

lea 

winPtr (a5) , a2 

cmp. 1 

a2, aO 

bne 

MSLD9 

tst. b 

winAct i ve (a5) 

bne 

MSLD1 

pea 

(a2) 

SXCALL 

$AIFE 

addq. 1 

“， sp 

bra 

MSLD9 

pea 

eventRec (a5) 

pea 

(a2) 

SXCALL 

$A3A2 


* 現在 ウィン ドウは 
本 アク ティ ブ か？ 

本 アクティブなら MSLD 丨へ 

* WMSe I ect 

* アクティブに する だけ 


本 ウィン ドウ 処理 
* SXCal IWindM 


SX-WINDOW 

GRPSMPL 

初期化 & 終了 &イ ベン ト 処理 モジ ル 


. include DOSCALL. MAC 

. include I0CSCALL. MAC 

• include SXCALL.MAC 

• xdef _INIT,_TINI 

• xdef IDLE 

• xdef MS L DOWN, MSLUP, MSRDOWN, MSRUP 

• xdef KEYDOWN, KEYUP 

• xdef UPDATE, ACTIVATE 

• xdef SYSTEM), SYSTEM2, SYSTEM3, SYSTEM4 


■リスト 3 GRPSMPL.S 


20 

21 RGB 

22 

23 

24 

25 WINOPT 

26 WIN_X 

27 WIN_Y 
28 一 

29 

30 MSLUP: 

31 MSRDOWN: 

32 MSRUP: 

33 KEYDOWN: 
KEYUP: 
SYSTEM3: 
SYSTEM4: 


34 

35 

36 

37 


38 

40 IDLE: 

41 

42 

43 

44 MS L DOWN: 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 MSLDI: 

57 

58 
•59 


ンンン ト ト 3 4 
ベベべ ンント トは 
イ イイべ ベン ンで 
プンプ イイべ ベ ト 
ツウツ ンプイ インい 
アダ アウ ツ厶ム ベな 
卜 卜 ト タアテ テイし 
フ イイ I I ススの も 
レラ ラキ キシシ 上に 
以な 
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60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 


addq. I 
tst. I 
beq 


118, sp 
dO 

MSLD9 


cmp. w H7, dO 
beq CloseBttn 


c I r. I 
c I r. I 
cl r. I 
pea 
pea 

SXCALL 


- （ sp) 

- (sp) 

-(sp) 

eventRec (a5) 
(a2) 

$A3A3 


73 

74 

lea 

20 (sp), sp 

75 

cmp. w 

mo, dO 

76 

bne 

MSLD9 

77 

78 

bsr 

Copy2Scrap 

79 MSLD9: 

80 

moveq 

HO. dO 

81 

rts 


82 

83 CloseBttn: 

84 

moveq 

dO 

85 

rts 


86 

87 

88 UPDATE: 

89 

pea 

winPtr (a5) 

90 

SXCALL 

$A20D 

91 

92 

addq. 1 

#4, sp 

93 

bsr 

DrawGraph 

94 

95 

pea 

winPtr (a5) 

96 

SXCALL 

SA20E 

97 

addq. 1 

14, sp 

98 

99 

moveq 

10, dO 

100 

rts 


101 

102 ACTIVATE: 

103 

move. 1 

eventRec whoml (a5) , dO 

104 

beq 

ACT9 

105 

lea 

winPtr (a5) , aO 

106 

cmp. 1 

a0, dO 

107 

bne 

ACT0 

108 

tst. b 

wi nAct i ve (a5) 

109 
t in 

bne 

ACT9 

1 1 U 

111 

St 

winAct i ve (a5) 

112 

bsr 

SetPa 1 et 

113 

bra 

ACT9 

114 ACT0: 

115 

sf 

winAct i ve (a5) 

116 ACT9: 

117 

moveq 

10. dO 

118 

I | o 

rts 


120 SYSTEM! : 

121 SYSTEM2: 

122 

move, w 

eventRec what2 (a5) , dO 

123 

cmp. w 

HI, dO 


* どこも 操作され なかった？ 

* ならば MSLD9 へ 

* クロ 了ズ • ボタン？ 

* ならは C 丨 os eB t tn へ 


本 コン ト □ー ル 処理 

* _SXCal ICtrIM 


* 標準 ボタンが 押された？ 
* 違う のなら MSLD9 へ 


* [ アップ デ ー ト イベント ] 

* —WMUpdate 

* アップ デ ー ト 開始 

* ウィン ドウ 内部を 描画 


* — WMUpdtOver 
* アップデート 柊 了 


* [ アク ティ ベイ ト イベント】 


* 自分の ウィン ドウが 
* アクティブに なった？ 
* 違う のなら ACT0 へ 


* アクティブ フラグを セット 
* パレ ッ トを 再 設定 


* アクティブ フラグを リセット 


システム イベント 1 ] 
システム イベント 2 】 


* タスクの 柊 了？ 
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beq 

AI ICIose 

cmp. w 

林 2, dO 

beq 

AI ICIose 

cmp. w 

1131, dO 

beq 

Save 

cmp. w 

832, dO 

beq 

WindowSelect 

cmp. w 

H8l,d0 

beq 

DragEnd 

moveq 

rts 

10, dO 

moveq 

rts 

M, dO 

pea 

wi nPtr (a5) 

SXCALL 

$A1FE 

addq. 1 

U, sp 

moveq 

rts 

#0, dO 

link 

a6, ¢-512 

move, w 

#-1, - (sp) 

pea 

-512 (a6) 

SXCALL 

$A35B 

addq. 1 

i6, sp 

lea 

-512 + $5a(a6), al 

move. 1 

al, a2 

addq. 1 

HI, a2 

lea 

name (a5) , aO 

moveq 

#-1,dl 

moveq 

190-1, dO 

addq. 1 

¢1, dl 

move, b 

(a0)+, (a2) + 

dbeq 

dO, SaveO 

move, b 

dl. (al) 

move, w 

i-l.-(sp) 

pea 

-512 (a6) 

SXCALL 

$A35C 

addq. 1 

n, sp 

unlk 

a6 

moveq 

rts 

HO, dO 

lea 

winPtr (a5) , a2 

move. 1 

eventRec_whom1 (a5) , 

cmp. 1 

a2, a0 


bne DragEnd9 


t ならば LetsGoAway へ 
本 全 ウィン ドウの クローズ？ 
ネ ならば LetsGoAway へ 

t セーブ？ 

本 ならば Save へ 

本 ウィン ドウの セレクト？ 
t ならば WindowSelect へ 

* ドラッグ 終了？ 

本 ならば DragEnd へ 


* 自分の ウィン ドウを 
* セレ ク トする 
t WMSelect 


* 現在の 状態を セーブ 


* 自分の タスク 管理 テープ ルを 
t コピーして くる 
t TSGetTdb 


* AI : コマン ドラ イン 

* (LASCII) の 先頭 

t A2 : コマン ドラ イン 文字列 
* 表示 中の ファイル 名 


* コマン ドライ ンに コビー 


* 文字 数を 収める 

* 自分の タスク 管理 テー ブルに 
* コ ピーす る 
本 TSSetTdb 


* [ドラッグ 終了 イベント 処理] 


* 自分の ウィン ドウ 上 
* で 離された？ 

I 違うなら DragEnd9 へ 


124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 AllClose: 

138 

139 

140 

141 WindowSelect: 

142 

143 

144 

145 

146 

147 

148 

149 Save : 

150 

151 

152 

153 

154 

155 

156 

157 


158 


〇〇 cn ^ co 4 lo co r oo 

rnj ro ^ J n 3 A 3 co co co co co co 




5 サンプル プログラム 


pea 

pea 

SXCALL 
addq. I 

bsr 


move, w 
SXCALL 
addq. I 


4(a0), dO 
H8, dO 

(aO, dO. I), aO 
dO, dl 
DragEndO 
DragEnd8 

H8, aO 


bra DragEnd9 

move, w HI, - (sp) 
SXCALL $A38C 
addq. I 12, sp 

moveq jlO, dO 
rts 


move. I winRect (a5) , dO 
move, w paramFI g (a5), dl 
btst ItO. dl 

beq JNITO 


move. I winRect+4 (a5), dl 

beq _INIT1 

tst. w dl 

cmp. w dO, dl 

ble _INIT1 

swap dO 

swap dl 


ReadAndDraw 


pea (a2) 

SXCALL $A131 
addq. I sp 

SXCALL $A38D 

SXCALL $A389 
bne DragEnd8 


move. I (aO), dl 

move. I 4 (aO) , al 

move. I (al) , aO 

cmp. w 轉 ’ FS. , (aO) 

beq DragEndl 


* 自分の ウィン ドウを 
本 カレン トに 

ネ _ GMSetGraph 


* — TSHideDrag 

* _ TSGetDrag 

* データがなければ 

* DragEnd8 へ 

* セル リス ト 長 
本 セル リス トへの ハン ドル 
* セル リス トの ア ドレス 

* アイコ ン 管理 レコード？ 

* ならば DragEndl へ 


* 次の セルへ 
* これで 終わり？ 

* でなければ DragEndO へ 

* 終わりなら DragEnd8 へ 


* アイコン 管理 レコードから 
* フルパスの ファイル 名を 得る 
i TS I SRecToSt r 


* ドラッグ された ファイルを 
* 歲み 込み、 

* 表示を 行なう 

* _ TSEndDrag 


* はじき 返す 
t _ TSEndDrag 


* [ アプリ ケー ショ ンの 
* 初期化を 行なう】 


n オ プショ ンが 
t 指定され た？ 
t 指定され ていなければ 
* JNIT0 へ 

* 正しい レク タング ルが 
* 指定され たか どうかを 調べる 


186 

187 

188 

189 

190 

191 

192 

103 

194 

195 

196 

197 

198 

199 

200 
201 
202 

203 

204 

205 

206 

207 

208 

209 

210 


DragEndO : 


DragEndl : 


220 

221 

222 DragEnd8: 

223 

224 

225 

226 DragEnd9 : 

227 

228 

229 

230 JNIT: 

231 

232 

233 


235 

236 

237 

238 

239 

240 

241 

242 


S 

(c P 

I 8 S 

,3 ， 
O A 2 

d A) UH 


5 

3 

B p 

6 • ^ , B s 
m o 3 丨 

d 3 An oo 

n 


6 Q. 

V IQ 3 ID 

o d 6 u h 
m a 


u h r 
s b b 


Q 

Ju 

d 

3 
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* カレン ト グラフ ホー トの 
本 ビット マ ッフを 
* グラフィック 画面 用の ものに 
ネ 差し替え、 グラフィック 画面 
* への 描画を 始める 


t TSGetWindowPos 
* 歹フォ ル ト 位置を 得る 

本 ウィン ドウ レク タング ルを 
* 作成 


* TSGetIO 

* タスク 丨 D を 得る 

* タスク 丨 D 
* クロ ー ズポッ クス あり 
* もっとも 手前に 
* ウィ ン ドウ ID=$32 
* 可視 

拿 ウィンドウ タイトル 
* ウィンド ウレ ク タング ル 
* ワーク 上に 作成 
本 WMOpen 
♦ウィン ドウを 開く 

* エラー？ 

* ならば _INIT_Err へ 

* アク ティ ブフ ラグを セット 

* ウィンドウ 内部を 描画す る 

* ( 最初の 1 回） 

* ファイル 名が 
* 指定され ている？ 

* いなければ . INI T9 へ 
* 指定され た ファイルを 
* 読み込み、 

* 表不 する 0 


243 

244 

245 

246 

247 

248 

249 

250 
251 . 

252 

253 

254 

255 

256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 
267 


INIT0: 


INIT1: 


INIT2: 


cmp. w d0, dl 
bgt _INIT2 
swap dO 
swap dl 
bra _INIT1 

SXCALL $A35E 

move. I dO, wi nRect (a5) 

add. I HWIN_X*$10000+WIN_Y, dO 

move. I dO, wi nRect+4 (a5) 

SXCALL SA360 
move. I dO, task I D (a5) 

move. I dO, - (sp) 

move, w IH， - (sp) 

move. I lt-1, - (sp) 

move, w «$32*16+WIN0PT,-(sp) 

move, w 1-1, - (sp) 

pea. I wi nT i 1 1 e (pc) 

pea. I wi nRect (a5) 

pea winPtr (a5) 

SXCALL $A1F9 
lea. I 26 (sp), sp 


268 


tst. 1 

dO 

269 


bmi 

_INIT_Err 

270 




271 


St 

winAct i ve (a5) 

272 




273 


bsr 

DrawGraphlst 

274 




275 


move, w 

paramF 1 g (a5) , dO 

276 


btst 

HI, dO 

277 


beq 

_INIT9 

278 




279 


bsr 

ReadAndDraw 

280 

JNIT9: 



281 


moveq 

#0, dO 

282 


rts 


283 

JNITJrr: 



284 


moveq 

M. dO 

285 


rts 


286 




287 DrawGraphlst : 



288 




289 


pea 

b i tmapRec (a5) 

290 


move, w 

#1, -(sp) 

291 


SXCALL 

$A16D 

292 


addq. 1 

16. sp 

293 




294 


lea 

lea 

winPtr (a5) , al 

295 


b i tmapRec (a5) , a2 

296 




297 


move. 1 

(al) , aO 

298 


move. 1 

2 (aO) , b i tmapRec+2 (a5) 

299 


move. 1 

6 (aO) , b i tmapRec+6 (a5) 

300 


move. 1 

aO, a3 

301 


move. 1 

a2, (al) 

302 





の 

のン用 
画 チ 画 
描 I 描 成 
の ル 面 作 
部ブ 画を ap 
内 サク プ tm 

ウ るツツ Bi 
ドす ィマ it 
ンをフ ト In 
ィ 備ラツ GM 
ウ 準グビ I 
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303 

304 

305 

306 

307 

308 

309 


320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 

345 

346 

347 

348 DrawGraph : 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 


5 サンプル プログラム 


pea (al) 

SXCALL $A131 
addq . 丨 “， sp 

SXCALL $A15A 
move. I a0, rgnHdl (a5) 

pea winLoca I Rect (pc) 
pea (aO) 

SXCALL $A15F 
addq. I sp 

pea (aO) 

SXCALL $A199 
addq. I #4, sp 

bsr CIS 


cl r. i - (sp) 

SXCALL $A19A 
addq. I “, sp 
move. I aO, scr iptHdl (a5) 

move. I a3, (al) 

pea (al) 

SXCALL $A131 
addq. I H sp 

move. I HO, - (sp) 
move, w #0*16, -(sp) 
move, w #1, - (sp) 
move, w HO, - (sp) 
move, w HO, - (sp) 
move, w IM, - (sp) 
pea cTitle(pc) 
pea cRect (pc) 
pea (aO) 

SXCALL $A289 
lea 26 (sp) , sp 
move. I aO, ctrlHdl (a5) 

bsr SetPalet 


rts 


lea winPtr (a5) ， al 
lea b i tmapRec (a5), a2 

move. I (al), aO 

move. I 2 (aO) , b i tmapRec+2 (a5) 
move. I 6 (aO) , b i tmapRec+6 (a5) 
move. I aO, a3 
move. I a2, (al) 

pea (al) 


* 自分の ウィンドウ 
幸 （グラフ ィ ック 画面 ) 
t _ GMSetGraph 


* _ GMNewRgn 

* 汎用 リージョン 

本 ウィン ドウ 内部を 意味す る 
* レク タング ル リージ：^ ンを 
幸 作成 

* — GMRectRgn 


* 初期 スクリプト 作成 開始 
本 — GMOpenScr i pt 


* 画面を 塗り潰す 

* ( スクリプトに 記録 ) 

* 記録 終了 

* _ GMC I oseScr i pt 


* カレン ト ビットマップを 
* テキス ト 画面へ 
* 自分の ウィンドウ 
t ( テキス ト 画面） 
i _ GMSetGraph 


* 標準 ボタンを 作成す る 
* 標準 ボタン 
* 最大値は 1 
* 最小値は 0 
* 初期値は 0 
本 可視 
* タイトル 

* 配置す る 位置と 大きさ 
* 自分の ウィン ドウ 上に 配置 
* _ CMOpen 


* グラフ ィ ック パレットを 
* 設定 


I 為： 巧 部を 描画す る 


本 カレン ト グラフ ポー トの 
ネ ビット マ ッフを 
* グラフィック 画面 用の ものに 
本 差し替え、 グラフィック 画面 
* への 描画を 始める 


* 目 分の ウィンドウ 
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360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 CLS: 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 

394 

395 

396 

397 TINI: 

398 

399 

400 

401 

402 

403 

404 

405 

406 

407 

408 

409 
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SXCALL $A131 
addq. I H sp 

pea winlocalRect (pc) 
move. I scr iptHdl (a5) , - (sp) 
SXCALL $A19C 
addq. I sp 

move. I a3, (al) 

pea (al) 

SXCALL $A131 
addq. I 14, sp 
pea (al) 

SXCALL $A28E 
addq. I 14, sp 

rts 


move, w #15, - (sp) 

SXCALL $A148 
addq. I 12, sp 
move, w l$1 00, - (sp) 

SXCALL SA144 

addq. I #2, sp 

pea winLoca I Rect (pc) 

SXCALL JA173 

addq. I 14, sp 

move, w l$00, - (sp) 

SXCALL $A144 
addq. I #2, sp 
move, w H$00, - (sp) 

SXCALL $A18D 
addq. I 12, sp 

rts 


move. I rgnHdl (a5) , - (sp) 
SXCALL SAI5B 
addq. I 14, sp 

move. I scr i ptHd I (a5) , - (sp) 
SXCALL U19B 
addq. I $4, sp 

pea wi nPtr (a5) 

SXCALL $A28B 
addq. I #4, sp 

pea wi nPtr (a5) 

SXCALL SA1FB 
addq. I H sp 

moveq ItO, d0 
rts 


* (グラフ ィ ック 画面) 
t GMSetGraph 


* 記録して おいた ス クリフ ト 
ネ を 描画す る 
t GMDrawScr ipt 


本 カレント ビッ ト マップを 
t テキス ト 画面へ 
* 自分の ウィンドウ 

* (テキス ト 画面） 
t _ GMSetGraph 

孝 ウィン ドウ 上の 
* コン ト □ー ルを 描画 

* CMDraw 


* [画面を 塗り 清す 
* サブルーチン] 

* バックグラウンド カラー 

*=15 

X _ GMBackCol or 

本 バック グラウン ド カラー 
% PSET 

% _ GMPenMode 

* ウィンドウ 内部を 塗り潰す 

* _6MFii IRect 

* PSET 

% _ GMPenMode 

* PSET 

X _ GMFontMode 


* [ 終了 処理】 

* 汎用 リージ ョ ンを 廃棄 
% GMD i sposeRgn 


* ス クリプ トを 廃棄 
t 6 M 0 i sposeScr i pt 


* ウィン ドウ 上の 
* コン ト ロールを 廃棄 
本 CMK i I I 


本 ウィン ドウを クローズ する 
本 WMCIose 

* WMDispose でない ことに 注意 


5 サンプル プログラム 


* $00 に 置き換えて、 

* 〗 0 進 文字列の 部分を 

* FPACK 一 STOL 
* で 数値に 変換、 

* バッファに 格納す る 

* 撊名 バッファを 初期化 


* 1 6 文字まで 


* [グラフィック 
* パレ ッ トを 設定す る ] 


* [ ファイル 読み込み 

* & スクリプト 作成】 

* READ 

* オープン 

* エラー ? 

* ならば RD_fileErr へ 
* 定数 （スペース 4 つ） 


* 要素は 1 5 個まで 


t 1 行 読み込み 

* もう 読めない？ 
t ならば ReadAndDraw3 へ 


* ASCI IZ 文字列に 変換 

* ( 念のため） 


416 



417 



418 SetPalet: 



419 

1 ea 

pal etData (pc) , al 

420 

moveq 

#0, dl 

421 

moveq 

#16-1 ， d3 

422 SetPaletO: 



423 

move, w 

(a1)+ ， d2 

424 

IOCS 

6PALET 

425 

addq. 1 

R dl 

426 

dbra 

d3, SetPa 1 etO 

427 



428 

rts 


429 



430 ReadAndDraw: 



431 

move, w 

#0, - (sp) 

432 

pea 

name (a5) 

433 

DOS 

_0PEN 

434 

addq. 1 

?6, sp 

435 

move. 1 

dO, d7 

436 

bmi 

RD 一 fileErr 

437 



438 

move. 1 

r * ,d5 

439 

lea 

angleList (a5) , a3 

440 

lea 

tagList (a5), a4 

441 

moveq 

#15-1, d6 

442 ReadAndDrawO : 



443 

move, w 

d7, - (sp) 

444 

pea 

inpPtr (pc) 

445 

DOS 

_F6ETS 

446 

addq. I 

?6, sp 

447 

tst. 1 

dO 

448 

bmi 

ReadAndDraw3 

449 



450 

lea 

inpPtr+2 (pc) , aO 

451 

moveq 

#0, dO 

452 

move, b 

- 1 (a0>， dO 

453 

sf 

(aO, dO) 

454 

move. 1 

aO t al 

455 ReadAndDrawl : 



456 

move, b 

(al)+, dO 

457 

beq 

RD_formErr 

458 

cmp. b 

r...do 

459 

bne 

ReadAndDrawl 

460 



461 

sf 

-1 (al) 

462 

dc. w 

$FEI0 

463 

move, w 

dO, (a3) + 

464 



465 

move. 1 

d5, (a4) 

466 

move. 1 

d5, 4 (a4) 

467 

move. 1 

d5. 8(a4) 

468 

move. 1 

d5, 12 (a4) 

469 

move. 1 

a4, aO 

470 



471 

moveq 

H16-1, dl 


0 ( ば 

$0 ら\ i 
てな 一 aw 
し 端 Er ば or 
探る 終 rm れ nd 
をえ 列 to ? け dA 
マ換 字 D _ マな ea 
ンき文 R ンで R 
力 置 力 

本本 本本 本本 拿 
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472 ReadAndDraw2 : 

473 

move, b 

(a1)+, (a4) + 


474 

dbeq 

dl, ReadAndDraw2 


475 

move, b 

H$20, -1 (a4) 


476 

lea 

1 6 (aO) , a4 


477 

478 

dbra 

d6, ReadAndDrawO 

* 1 5 個 読み 柊 わるまで ループ 

479 

bra 

ReadAndDraw4 

* 読み i 冬 わ っ たら 

480 

481 ReadAndDraw3 : 

482 

c 1 r. w 

(a3) + 

t ReadAndDraw4 へ 

* 残りの 要素を クリア 

483 

move. 1 

d5, (a4) + 


484 

move. 1 

d5, (a4) + 


485 

move. 1 

d5, (a4) + 


486 

move. 1 

d5 f (a4) + 


487 

dbra 

d6, ReadAndDraw3 


488 

489 ReadAnd0raw4 : 

490 

move, w 

d7, - (sp) 

* クロー ズ 

491 

DOS 

CLOSE 

492 

j n 〇 

addq. 1 

?2, sp 


493 

494 

move. 1 

scr iptHdl (a5) , - (sp) 

* これまでの スクリプトを 廃棄 

495 

SXCALL 

$A19B 

* ― GMDisposeScript 

496 

addq. 1 

U, sp 


497 

498 

move. 1 

rgnHdl (a5) , - (sp) 

* 新たに スクリプト を 記録 開始 

499 

SXCALL 

$A199 

* _ GMOpenScr ipt 

500 

addq. 1 

“， sp 


501 

502 

bsr 

CLS 

* まず 画面の 初期化を 記録 

503 

504 

move, w 

_• d5 

t 9 (T から スター ト 

505 

lea 

angleList (a5), a3 


506 

lea 

tagL i st (a5) , a4 


507 

moveq 

115-1, d6 


508 ReadAndDraw5 : 

509 

move. 1 

d5, d4 


510 

move, w 

(a3)+, dO 


511 

beq 

ReadAndDraw7 


512 

sub. w 

dO, d4 


513 

bpl 

ReadAndDraw6 


514 

add. w 

H360, d4 


515 ReadAndDraw6 : 

516 

moveq 

IM4, dl 


517 

sub. w 

d6, dl 


518 

move, w 

dl, - (sp) 

* 描画 色を 決める 

519 

SXCALL 

$AI47 

本 _6MForeCol or 

520 

521 

522 

addq. 1 

#2. sp 


move, w 

d5, - (sp) 

* 数値に したがって 各 要素の 

523 

move, w 

d4, - (sp) 

* 円弧を 塗り潰して 描画す る 

524 

pea 

oval Rect (pc) 


525 

SXCALL 

$AI79 

t _6MFil lArc 

526 

addq. 1 

n , sp 


527 

528 

addq 

m, di 


529 

mul u 

#12, dl 


530 

swap 

dl 


531 

move, w 

#216, dl 


532 

swap 

dl 


533 

move. 1 

dl, - (sp) 


534 

sub. 1 

nooiojooc , di 



164 


サンプル プログラム 


move, w 
DOS 

addq. I 

moveq 

rts 


link 

clr. I 
SXCALL 
addq. I 

pea 

move, w 

SXCALL 
addq. I 


move. I 
pea 

SXCALL 

lea 

add. I 
move. I 
SXCALL 
addq. I 
move, w 
c I r. I 
pea 

SXCALL 


lea 

move. I 
dbra 

c I r. I 
SXCALL 
addq. I 
move. I 

bsr 


moveq 

rts 


pea 

move, w 
SXCALL 
addq. I 


dl, - (sp) 

(a7) 

$A173 
12 (sp), sp 

H$ 0016 _0000，dl 
dl ， - (sp) 

$A16E 
“， sp 
116, - (sp) 

-(sp) 

(a4) 

$A191 
10 (sp), sp 

I6(a4) f a4 
d4, d5 

d6, ReadAndDraw5 

- (sp) 

$A19A 

“ 丨 sp 

a0, scr i ptHdl (a5) 
DrawGraph 


HO, dO 


右側の 色 見本 
GMFil IRect 


GMMove 


撊 名を 描画 
GMDrawStr 


* 1 5 個 描く まで 繰り返す 

本 スクリプト 記録 終了 
i GMCIoseScr ipt 


記録した スク リプト 
を 描画す る 

ドラッグを 受け入れる 


f i I eEr rMsg (pc) 
a-(sp) 

$A2F6 
§6, sp 

m, do 


ファ イ ルが 読めない 旨 
エラー ダイアログで 警告 
DMError 


ドラッグは はじき 返す 


formErrMsg (pc) 
#1, - (sp) 

$A2F6 
16, sp 

d7, - (sp) 

.CLOSE 
?2, sp 

HI, do 


a6. #-$40 

- (sp) 
SA0B7 
U, sp 

-S40(a6) 
ItO, - (sp) 

SA12D 
#6, sp 


ファイルの 形式が 違う 旨 
エラー ダイアログで 警告 
DMError 


クローズ 

ドラッグは はじき 返す 
[ データを ス クラ ップへ 


踏切 ボイ ン タへ 
EMEnCross 


* テキス ト タイプの 
* グラフ ボート 
* — GMOpenGraph 


535 

536 

537 

538 

539 

540 

541 

542 

543 

544 

545 

546 

547 

548 

549 ReadAnd0raw7 : 

550 

551 

552 

553 

554 

555 

556 

557 

558 

559 

560 

561 

562 

563 

564 RD fileErr: 

565 

566 

567 

568 

569 

570 

571 

572 

573 RD f ormErr : 

574 

575 

576 

577 

578 

579 

580 

581 

582 

583 

584 

585 

586 Copy2Scrap : 

587 

588 

589 

590 

591 

592 

593 

594 

595 

596 


q 

6 

vs 
o t 


6 A Q. 
a V c d 
6 o X d 
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626 

627 

628 

629 

630 

631 

632 

633 

634 

635 

636 

637 

638 

639 

640 

641 

642 

643 

644 

645 

646 

647 Copy2ScrapO: 

648 

649 

650 

651 

652 

653 


move. I a0, aZ 
move. I (a2) , a3 

move, w l%l 1 II, ~ (sp) 
pea winlocalRect (pc) 
cl r. w - (sp) 

SXCALL $AICA 
addq. I R sp 
move. I a0 9 b i tsHdl (a5) 
pea (a0) 

SXCALL $A1CC 
addq. I H sp 
move. I (aO) , al 

move. I al, (a2) 

pea (a2) 

SXCALL $A1D1 
addq. I H sp 


pea 

(a2) 

SXCALL 

$A131 

addq. 1 

#4, sp 

pea 

winloca 1 Rect (pc) 

move. 1 

scr i ptHd 1 (a5) , - (sp 

SXCALL 

$A19C 

addq. 1 

¢8, sp 

move. 1 

$16(a1), d6 

move. 1 

SOa(al). al 

move. 1 

d6 f d5 

add. w 

#4+4+8+4+4+32, d5 

move. 1 

d5, - (sp) 

SXCALL 

$A021 

addq. 1 

§4. sp 

beq 

Copy2Scrap9 

move. 1 

dO, a4 

move. 1 

(a4) r aO 

move. 1 

ft* PAT4* , (aO) + 

addq. 1 

#8, d6 

move. 1 

d6, (aO) + 

c 1 r. 1 

(aO) + 

move. 1 

WN X*$ 1 0000+W け 

subq 

H8, d6 

subq 

m, d6 

move, b 

(al) +, (aO) + 

dbra 

d6, Copy2ScrapO 

move. 1 

^ PAL2. , (aO) + 

move. 1 

1132. (aO) + 

lea 

pal etData (pc) , al 


4 ぺ ー ジ 

大きさは ウィンドウと 同じ 
テキス ト タイプの ピッツ 
GMNewB i ts 


ロックして 使用 開始 
GMLockB its 


* 作成した グラフ ボー トと 
♦ ピッツを 結び付けて 
* 内容を 整合させる 
t GMCal cGraph 


* 作成した グラフ ポー トを 
本 カレン トに する 
t _6MSetGraph 


* 記録して ある ス クリフ トを 
* 描画 

* (テキス ト タイプで 

* 描画され るの が ミソ） 

* _ GMDrawScr ipt 

* スクラップ 用の 
* セル リス トの 作成 開始 

* [ ' PAT4 ， : 4 
t [cell size 

* ( bound rect 

* [ . PAL2* : 4 

* [ cell size 

t [ palet data : 32 

* セル リス トを 収める のに 
* 必要な サイズ 
% MMChHdINew 
* で 再配置 可能 ブロック 
* を 作成 

* 作成で きな けれは 

t Gopy2Scrap9 へ 


最初の セルは 
. PAT4, タイフ 

• PAT4’ サイズ 
バウンド レク タング ル 


(aO) + 


ピッツの 内容を コピー 
非 効率 きわまりない 

次の セルは 
• PAL2* タイプ 
. PAL2, サイズ 


盟 iiii 610 i 612 613 614 615 616 617 618 619 620 m 622 623 624 625 
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654 

moveq 

H16-1, d6 

655 Copy2Scrap 1 : 



656 

move, w 

(al)+ ， (a0) + 

657 

658 

dbra 

d6, Copy2Scrapl 

659 

pea 

(a4) 

660 

move. 1 

d5, - (sp) 

661 

SXCALL 

$A390 

662 

663 

addq. 1 

#8, sp 

664 

pea 

(a4) 

665 

SXCALL 

$A038 

666 

addq. 1 

U, sp 

667 Copy2Scrap9 : 



668 

move. 1 

bitsHdl (a5),-(sp) 

069 

SXCALL 

$A1CB 

670 

67] 

addq. 1 

“, sp 

672 

move. 1 

a3, (a2) 

673 

pea 

(a2) 

674 

SXCALL 

$AI2E 

675 

addq. 1 

“， sp 

676 



677 

SXCALL 

$A0B8 

678 



679 

uni k 

a6 

680 



681 

rts 


682 



683 

. even 


684 winT itle: 



685 

dc. b 

12/ グラフ SAMPLE' 

686 

. even 


687 winLocal Rect : 



688 

dc. w 

0, 0 ， WIN_X ， WIN_Y 

689 oval Rect : 



690 

691 

dc. w 

8,8, 192, 192 

692 cTitle: 



693 

dc. b 

16, クリ ッフボ ー ドへ • 

694 

. even 


695 cRect : 



696 

RQ7 

dc. w 

200, 178, 31 6, 198 

U o 1 

698 

. even 


699 pal e tData : 



700 

RGB 

0, 0, 31， 0 

701 

RGB 

31 ， 0, 0, 0 

702 

RGB 

0,31,0, 0 

703 

RGB 

31 ， 0, 31， 0 

704 

RGB 

0, 31, 31， 0 

705 

RGB 

31 ， 31 ， 0, 0 

706 

RGB 

0, 0, 16, 0 

707 

RGB 

16, 0, 0, 0 

708 

RGB 

0, 16, 0, 0 

709 

RGB 

16, 0, 16, 0 

710 

RGB 

0, 16, 16, 0 

711 

RGB 

16, I6 r 0, 0 

712 

RGB 

0, 31, 24, 0 

713 

RGB 

0, 20, 31, 0 

714 

RGB 

31 ， 20, 24, 0 


* パレット デ ー タを コピ ー 


* セル リス トを 収めた ブロック 
本 セル リス トの サイズ 

* _ TSPutScrap 

* で スクラップに 送る 

* セル リス トの ブロ ックを 
t — MMHd I D i spose 
* で 廃棄 

* ピッツを 

* — 6MD i sposeB i ts 
* で 廃棄 

* 一 応 もとの 
* ビッ ト マップに 戻して 
* グラフ ポー トを クローズ • 
t — 6MC I oseGr aph 

* 通常の マウス ポインタへ 
t EMDeCross 


ネ [ 固定 データ ] 

t ウィンドウ タイトル 

* ウィン ドウの 大きさを 
* 口ー カル 座標で 
* 示す レク タング ル 


* 円グラフの 大きさ 


* ボタンの タイ ト ル 


ボタンの 位置と 大きさ 


I パレット デ ー タ 
* 青 
* 0 
* 緑 
♦紫 
* 水色 
* 黄色 
本 暗い 青 
拿 暗い 赤 
t 暗い 綠 
* 暗い 紫 
* 暗い 水色 
* 暗い 黄色 

* ぺパ ー ミン トヴリ ー ン 
* ( 趣味） 

* ライ ト ブルー 
* 謎の 色 
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715 

716 

717 inoPtr: 

718 

719 

720 

721 f i I eEr rMsg : 

722 

723 

724 formEr rMsg : 

725 

726 

727 


RGB 31, 31, 31, 0 拿 白 


dc . b 255 * 2 5 5 文字まで 読み込める 

ds . b 1+256 * 1 行 入カ バッファ 

dc . b •ファ イ ルが 読み込めません。’ ， 0 

dc . b •グラフ データではありません。 •，(） 

. end 


■ リスト 4 GRPSMPL 用 makefile 


1 GRPSMPL 用 makefile 

GRPSMPL. X: 

SKELTON, o GRPSMPL. o 

Ik 

-oGRPSMPL SKELTON GRPSMPL 

SKELTON, o: 

SKELTON, s WORK. INC 

as 

SKELTON 

GRPSMPL o: 

GRPSMPL. s WORK. INC 

as 

GRPSMPL 
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新設され た マネージャ 


SX - WINDOW バージ ョン〗. 10 で 大きく 変わった 点の 1 つ 
は， 既存の マネージャの 拡張/改良だった わけです が， それば 
かりでは なく， 新たに 2 つの マネージャが 追加され ています。 
この 2 つの マネージャは， いずれも 以前の SX-WINDOW 
では 実現で きなかった よろ な 新しい アプリケーションに 道を 拓 
いて くれる はずです 0 


X 68000 は セントロ ニ クス 準拠の プリンタ ポー トを 1 つ 備えて いるので， 原則と して 接続 
できる プリンタの 数は 一度に 1 台です。 これに 対して， SX - WINDOW 上で 動作す る タスク 
は 複数で あり， 複数の タスク カす 無秩序に プリンタ ポートへ データを 出力した 場合， 正常な 印刷 
結果を 望む ことは できません。 プリント マネージャの 機能の 第 1 は， プリンタ ポートへの 出 
力 権を 管理し， タスク 間で 競合が 発生し ないように 調停す る ことにあります。 プリント マネー 
ジャを 正し 〈利用して いるかぎ り， ほかの タスクが 印刷を 行って いると きには， ほかの タスク 
は 印刷を 開始で きないので， プリンタ ポートの 奪い合いは 発生し ません （図 1)。 

■図 1 プリ ンタ ポート への 出力 権の 調停 



1 時に 1 つの タスクの 
み 出力 権を 与える。 

1 つの タスクが 出力を 
終了す るまで 出力 権は 
移動し ない。 


第 £ の 機能は， プリンタの 機種 間の 差異を 吸収し， 決められた 手順に さえした がえば 各種 
の プリ ンタで 同一の 印刷 結果が 得られる こ とです。 Human では X 68000 に さまざま な 種類 
の プリ ンタ が' 接続で き るよう に， プリ ンタの 機種の 違いを プリ ン タテ、、 パ' イス ドライ バ ( prruirv . 
sys 等) で 吸収して きま した。 SX - WINDOW でも その 思想は 継承され プリンタ ドライバ* 1 
を 用意して プリント マネージャに 登! 象す る こ とで さ まざ ま な プリ ンタに 対応す る こ とがで きる 
ようになって います* 2 。 アプリケーションからの 印刷 要求は， プリント マネージャを 通じて 


3 1 プリン ト マネ ー ジャ 

SX - WINDOW の OS としての 役割の 1 つと して， 資源を 管理 するとい う 仕事が あります。 
主記憶 や 補助記憶装置， CPU 時間の ほかに も， X 68000 に 付属して いる さまざまな 装置を 
管理し なければ ならない のです が， バージョン 1.10 以前の SX - WINDOW では， ごく 基本 
的な プリンタの 管理が 不十分でした。 プリンタへの 出力を 管理す る ソフト ウェアは リソース 
の 中に 用意され てい ま したが， その 機能は テキス ト データの 出力と 画面 全体の 八 ー ド コピー 
程度で あるう え， 複雑な 手順を 必要と しました。 

バージョン 1.10 では， プリンタ 出力に 関する 機能を SX - SYSTEM の 中に 統合し ， SX 
コールに よってかん たんに 呼び出せ るよ 5 になって います。 この 機能を 司って いるの が プリ 
ント マネージャです。 

1 | プリン ト マネージャの 機能の 概要 


プリン ト マ — ジャ 
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プリンタ ドライバに 送られ， コン ト ロール パネル 等で 指定した プリンタ ドライバ 内の 印刷 ルー 
チンに よっ て 実際の 印刷が 行われます。 

* 丨 ： プリン ト マネージャに 登録す る プリンタ ドライバと， Human の config . sys に 登録す る プリ ンタ用 
デバイス ドライバと は 別の ものです。 Human の プリン タ用デ バイ ス ドライ バ は*. sys の ファイル 
として 用意され， config . sys の DEVICE = 行 によって 登録し ますが， ブリント マネージャの ブリン 
タ ドライバは リ ソース PRTD と して 用意され， コン ト ロール パネル 等で 登録し ます。 

*2: バージョン 1.02 でも 同様の 形式で プリンタ ドライバは 存在し ま したが， それは バージョン 1.10 の 
もの ほど 完成され たもので はありませんでした。 その 機能と しては， デスクトップ 全体の ハー ド 
コ ピー ，そ して 印刷す る 文字 コー ドを バッファ リ ング して Human の プリ ンタ用 デバイス ドライバ 
への 引き渡し， といった ものでした。 バージョン 1.10 の プリンタ ドライバは， Human の デバイス 
ドライバとは 完全に 独立した 存在です。 そのため， ほとんど 意味はありません が， Human と SX - 
WIND 0 W で プリ ン タを 使い分ける といった 芸当 も 可能です。 

以上に 加えて， プリント マネージャには 図形 や 文書の 印刷に 便利な ユー ティ リ ティが 含まれ 
ています。 

プリント マネージャを 使って 行う 印刷には， 大きく 分けて， 「コード 印刷」， 「ページ 印刷」， 
「プロセス 印刷」， そして 「例外的な 印刷」 の 4： つを 挙げる こと 力 ? できます。 それぞれ にっい 
て 解説し ます。 


ー ド 印刷 


コー ド 印刷は， 文字の みで 構成され る 文書 データを 印刷す るた めの 機能です。 

一般に， 文字を 印刷す るた めには ASCII コード （あるいは カナ， カナ 記号を 含めて JIS 
コード） を プリンタに 出力す る だけで 事足ります。 ただし， 漢字な どの 全角 文字を 印刷し よう 
と 思っ た 場合は 少 々面倒です。 日 本の パソコン に 接続 して 使う プリンタの ほとんどに は 漢字 
フォント が 搭載 さ れ ている ので， JIS 漢字 コードと 制御 コー ドを 出力す る こと で 全角 文字を 
印刷す る ことができます* 3 。 しかし， プリンタの 機種 系列 ごとに 制御コードが 異なって いる 
ので， 使用して いる プリ ン タの撇 重に 適合した プリンタ ドライバを 登録して おく 必要が ありま 
す。 つまり， プリンタ ドライバの 登録 さえ 行って おけば， プリンタ 機種 間の 相違は 吸収され， 
どのよう な 環境で 1 W 乍 している SX - WINDOW 上で も， ほぼ 赚な 文書の 印刷 結果が 得られ 
るので す （17£ ページ 図 2)。 

*3: 外字な ど プリンタが フォン トを 持って いない 文字を ビッ ト イメージと して 印字す る 場合 も ありま 
す 0 


ところで， Human や MS - DOS の プリ ンタ デバイスを 利用して テキス トフ アイ ルの 印刷 
を 行った 場合， プリンタの 紙の 觀に よらず， つねに 印刷 形式は 一定でした。 横 80 文字 伴 
角 換算)， 縦 方向は とくに 決まって いないと いうの が 普通だった わけです が* 4 ， これは， 連続 
用紙を 使用す る ライン プリ ンタが 主流であった 時代の 名残りでした。 現在 使われて いる プリン 
夕の 多くは， A 4 判を はじめと する 多様な サイズの 普通 紙 （あるいは 感熱 紙） を 使うよう に （あ 
るいは 使える ように） なって おり， 実際に 印刷の 大部分は こうした 用紙に 行われて いるよう 
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■図 2 コード 印刷の イメージ 

文字列 


文 害 


■ 


タスク 〇 - 



タスクから 文字列が 渡 
される 


プリン ト マネージャは 
文字列を 整形 加工して 
文 害に する 


各 メーカ 別の プリ ンタ ドライバが 
プリ ンタ 別の 制御 コー ドを 生成し， 
出力す る 


です。 Human や MS - DOS の プリ ン タテ、、 パ、 イ スの 過去を 引きずった 印刷 形式と いうのは， こ 
う した 現 « に 即して いるとは いえません。 

*4:Human の プリ ンタデ バイ スの 場合は， デバイス ドライバ 登録 時に オプ シヨ ンを 指定す る ことによ っ 
て丨 ページの 横文字 数 や 行数を 指定す る ことが 可能で あるな どの 配慮を うかがう ことができます。 
これが DOS 系の 機械に なると， こういった 心遣いは 皆無です。 DOS 系の 機械の 場合は， アプリ ケー 
シ ヨンが それぞれ 印刷機 能を 持って いるので 不自由を 感じない のか も しれません が， すべての ア 
プリ ケーシ ヨンに 共通な 印刷 環境と いう 思想が 欠落して いるた めに， ユーザは さま ざまな 不利益 
をこう むる ことにな り ます。 

また， 左右 上下 マージン や 行 間隔， 文字 間隔を 設定で きないな ど， ワープロの 出力を 見慣れ 
た， 目の 肥えた ユーザから 見れば， 「使い ものに ならない」 と 思われても しかたがない かもし 
れ ません。 

プリント マネー ジャ では， コード 印刷に はじめから レイ アウ トの 概念を 導入して， プリンタ 
の 機能 や 使用す る 用紙 そ して 印刷す る 目的に 即した レイ アウ トで 印刷を 行う こ と 力 ? できる よ 
うに なって います。 こうした レイアウトを はじめと する 印 届 IJ 環境は， コントロール パネルな ど 
でかん たんに 設定す る こと 力す 可能です (173 ページ 図 3)。 

印刷 環境が 設定され てし ま え ば， アプリ ケー シヨ ンは 印刷 纖 を 意識す る 必要が な くな り ま 
す。 コード 印刷を 行いたい 文字列 （文書） を 渡す だけで， プリント マネージャは 設定され た 印 
刷 環境と いう 「型」 に 文字列を 流し込んで 印刷を 行って くれる のです。 


C 


A 


C 社用 フリン 
タ ドライバ 


フリン ト マネ ージ ャ 
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■図 3 印刷 環境 設定 ダイアログ 



ページ 印刷 


ページ 印刷は， 主と して 画像 や 図形な どを 印刷す るた めの 機能です。 

ページ 印刷では， メモリ 上に 仮想の グラフ ポートを 作成し， そこに 描画した ものが プリンタ 
用紙の 1 ページと して 印刷され ます。 つまり， グラフィック マネージャを 使って 画で きる 
ものなら ば， ほとんど そのまま プリンタに 印刷す る こと 力 5 飞 T 能な のです （図 4)。 ただし， 内 
部では スクリプトを 利用して 处理 が 行われて いるた め， スクリプトに 記録され る SX コール 
のみ 使用可能です。 

■図 4 ページ 印刷の イメージ 


ビッ ト マップ 
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この グラフ ポート とビッ ト マップは ディスプレイ 装置とは 無関係な ので， 画面への 描画と プ 
リン タ への 印刷を 完全に 別 扱いに する ことができます。 従来 ^ プリンタに 印刷す るた め‘ だけに 
画面に 描画を 行い， それを ハードコピー していた ことを 考える と， はるかに スマートな 方法で 
ある ことは おわかり いただける と 思います。 

コード 印刷 同 m プリンタの _ 間の 差異は プリント マネージャ， プリンタ ドライバ 、によつ 
て 吸収され るので， どのような 環境で iW 乍して いる SX - WINDOW 上で も， ほぼ 同様な 印刷 
結果が 得られます。 


プロセス 印刷 


プロ セス 印刷は ページ 印刷 と同樣 おも に 画像 や 図形を 印刷す る ための 機能です。 

ページ 印刷では， スクリプトに 記録で きる SX コールに よって 描画され たもの だけが 印刷 
可能でした が, プロセス 印刷では グラフ ィ ック マネージャ による 描画に 加えて， 直接 ビッ トマ ッ 
プを 操作 して， そ の 結果を 印刷す る こと 力 河 能です。 

描画を 行う サブルーチンは ユーザー プロセス と 呼ばれ， プロセス 印刷の 準備の 段階で プリン 
ト マネージャに 登録して おく こ とで， 描画/印刷が 実行され る ことになります。 

プロセス 印刷の 応用 例と して， カラー 画 象の 印刷が 考えられます。 カラーの 画像を 白黒の プ 
リ ンタで 印刷す るには， 色の 明暗を タ イリ ングで 表現し なければ な りません が， こう いった 芸の 
細かい^！ は グラフィック マネージャで 行おう とすると， かなり 手間が かかります。 このよう 
な 場合， 元の カラー 画像を 白黒の タ イリ ング 表現に 変換して 直接 ビッ ト マップに 書き込む よう 
な ユーザー プロ セスを 用意した プロセス 印刷が 適 しています。 


例外的な 印刷 


SX 1.02 以前では， プリント マネージャは SX - SYSTEM 内に 収められて おらず， リソー 
ス PRTM の 形* 5 で 提供され てきました。 その 名残りと して， SXIJX ) でも PRTM は 用 
意され ています が， プリント マネージャが SX - SYSTEM に 統合され たこ とに よ り， ユー テイ 
リ ティ 的な 使われ 方が 主と なって います。 

*5: リソース タイプ PRTM , IDO 。 SYSTEM . LB に 含まれて います。 前著 r SX _ WINDOW 〜 」 222 ページ 参 
照 （ただし， この 時点での 表記は 「ブリン タ マネージ ャ 」）。 

SX 1.10 の PRTM の おも な 機能は 次の 3 つです。 


1) テキスト ファイルの 印刷 

2) ファイルの ダンプ 出力 

3) デス クトッ プ 全体の ハード コ ピー 

これらの 使い方 等に ついては， 『 SX - WINDOW 〜』 ページを 参照して ください。 
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印刷の 仕組み 


プリント マネージャの 内部で， どのよう にして 印刷が 行われて いるかを 解説し ます。 


印刷 環境 レコード 


プリント マネージャが 印刷を 行うた めの 各種 情報は， 印刷 纖 レコードに ま とめられて いま 
to 印刷 環境 レコードは， $8 E バイ トに およぶ 大きな レコードです。 各種 印刷を 行う 前に， 
アプリケーションは 印届議 レコー ドと なる 再! 己 置 可能な メモリ ブロックを 作成し， その 中に 
必要な* 倩 報を セット して おかなければ なり ません。 

印刷 環境 レコー ドの 内容は 以下のと おり です 0 


オフセット 

欄 名 

内 容 

+ $00. w 

prPaperKind 

用紙の 種類 

+ $02.w 

prPaperOption 

プリ ンタ オプションの 有無 

+ $04 

prPaperRect 

用紙の サイ ズを 示す レク タン グル 

+ $0c 

prLimitRect 

印刷 可能な 範囲を 示す レ クタ ン グル 

+ $12 

prPageRect 

実際に 印刷 を 行う 範囲を 示す レク タン グル 

+ $lc 

prPaperRsv 

システム 予約 （8 バイト） 

+ $24.w 

prDocImage 

ビッ ト イメージ 出カ フラグ 

+ $26.w 

prDocColumn 

1 行の 文字 数 

+ $28.w 

prDoc し ine 

1 ページの 行数 

+ $2a.w 

prDocTab 

タブ サイズ 

+ $2c.w 

prDocHeight 

改行 幅 

+ $2e 

prDocRsv 

システム 予約 （8 バイ ト） 

+ $36.1 

prRes 

縦横の 解像度を 示す ポイント 

+ $3a.l 

prANKSize 

半角 文字の 縦横の ドッ ト 数を 示す ポイント 

+ $3e.l 

prKanjiSize 

全角 文字の 縦横の ドッ ト 数を 示す ポイント 

+ $42.w 

prColorKind 

カラー 印刷の 色 種類 

+ $44 

prPrnRsv 

システム 予約 （8 バイ ト） 

+ $4c.w 

prManVer 

フリン ト マネ ー ジ ヤのバ ー ジョン 

+ $4e 

prManRsv 

システム 予約 （8 バイ ト） 

+ $56.w 

prDrvVer 

プリ ンタ ドライバの バージョン 

+ $58 

prDrvRsv 

システム 予約 （8 バイ ト） 

+ $60.w 

prMinPage 

印刷 範囲 開始 ページ 

+ $62.w 

prMaxPage 

印刷 範囲 終了 ページ 

+ $64.1 

prllserData 

ユ ー ザ 用の デ ー タ 

+ $68 

prUserRsv 

ユーザ 用の 予約 領域 （8 バイト） 

+ $70.w 

prFstPage 

印刷 開始 ページ 

+ $72.w 

pr し stPage 

印刷 終了 ページ 

+ $74.w 

prDupPage 

1 ページ あたりの 印刷 枚数 

+ $76.w 

prMode 

印刷 モード 

+ $78.w 

prMask 

印刷 モー ドの マスク 

+ $7a 

prJobRsv 

システム 予約 （8 バイ ト） 

+ $82.w 

prPageCount 

現在 印刷 中の ページ 

+ $84.w 

prDupCount 

現在 印刷 中の 部数 

+ $86 

prWorkRsv 

システム 予約 （8 バイ ト） 


\—/ \)x \1 / \—/ \]/ \)/ N1/ o —234 5 6 7 8 9 0 I 2 3 4 5 6 7 
I 2 3 4 5 6 7 8 9 丨 I 丨 I I I 丨 I I I 2 2 2 2 2 2 2CVI 

/ \ /(\ /l\ /(\ /(\ /(\ /c\ /(\ /(\ /v\ /(\ y — \ /(\ /(\ /fv\ /(\ /(\ /l\ ^ / \ / \ /(\ /IV /(\ /l\ y 
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(1) 用紙の 觀 

プリ ンタで 使用す る 用紙の 種類を 意味 しています。 
用紙と 数値は 次の よう に 対応 しています。 


0 

フリーサイズ 

1 

A 3 用紙 縦 置き 

2 

A 3 用紙 横 置き 

3 

A 4 用紙 縦 置き 

4 

A 4 用紙 横 置き 

5 

A 5 用紙 縦 置き 

6 

A 5 用紙 横 置き 

7 

B 3 用紙 縦 置き 

8 

B 3 用紙 横 置き 

9 

B 4 用紙 縦 置き 

10 

B 4 用紙 横 置き 

II 

B 5 用紙 縦 置き 

12 

B 5 用紙 横 置き 

13 

10x11 インチ 連続 用紙 

14 

15X1 1 インチ 連続 用紙 

15 

ハ ガキ縦 置き 

16 

ハガキ 横 置き 


(2) プリンタ オプションの 有無 


プリンタ に イナ 属する 周 _ 器の 種類を 意味 しています。 


0 

周辺機器 なし 

1 

ト ラク タフ イーダ 付き 

2 

カツ トシ ー ト フイ ー ダ 付き 

3 

ハ ガキフ イーダ 付き 


(3) 用紙の サイズを 示す レク タング ル 
⑷ 印刷 可能な 範囲を 示す レク タング ル 

(5) 実際に 印刷を 行う 範囲を 示す レク タング ル 

これらの レク タング ノレは 1 ページ （1 枚の カット 紙 ハ ガキ， あるいは 連続 用紙の 1 ペー 
ジ） の 中の 印刷を 行う 範囲を 示して います。 

⑸ の 実際に 印刷を 行う 範囲が ホーム 位置と なり， 用紙の サイズ や 印刷 可能な 範囲の 左上 
の 座標は 負の 値と なります （17? ページ 図 5)。 

(6) ビット イメージ 出カ フラグ 

コード 印刷を 行う 際に， プリ ンタの 内蔵 フォントを 使わずに ビット イメージで 印字す る 文字 
の 麵 を 意味し ます。 1 ワード 中の 各ビッ トが 文字の 種類に 対応し， 1 になって いる 文字が ビツ 
ト イメージで 印字され ます。 
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■ 図 5 各レク タング ルの 間 係 

用紙 

xO s ,yO s 


xls.yls 


x2 s ,y2 s 

厂 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

し 

1 

1 

1 

1 

1 

1 

1 

_) 

x2e,y2 e 


用紙 サイ ズ = (xO s ， yO s ) (xO e ,yO e ) 


印刷 可能な 範囲 = ( xl s , yl s )-( xl e , yl e ) 

実際に 印刷を 行う 範囲 二 
(x2s,y2s)-(x2e,y2 e )* 

(=( x 2 s ， y 2 s ) は (0,0) に 固定） 

上 マージン 40 ドット， 右 マー ジン 20 
ドットなら 

J ~~ ( x 0 s , y 0 s ) = (-20,-40) 

下 マージン となる 


xOe.yOe 


bitO 

外字 

bitl 

システム 予約 

bit2 

全角 文字 • JIS 第 2 水準 

bit3 

全角 文字 • JIS 第丨 水準 

bit4 

半角 文字 


(7) 1 行の 文字 数 

(8) 1 ページの 行数 

(9) タブ サイズ 

(10) 改行 幅 

コード 印刷 時の， 1 ページに 印刷され る 文書の おおまかな 書式 力す 収められ ています。 1 行の 
文字 数， 1 ページの 行数， タブ サイズは 半角 文字を 単位と して， 改行 幅は ドットを 単位と して 
指定し ます （178 ページ 図 6)。 

(11) 縦横の 解像度を 示す ポイント 

プリンタの 横 方向， 縦 方向の 解像度を DPI (ドット/インチ） 単位で 示します。 この 数値 
は ポイント 形式で， 上位 ワー ドは 横 方向， 下位 ワードは 縦 方向の 解像度を 意味して います。 

(12) 半角 文字の 縦横の ドット 数を 示す ポイント 

(13) 全角 文字の 縦横の ドッ ト 数を 示す ポイント 

半角, 全角 文字の 縦横の ドット 数を ポイント 形式で 示 します。 すなわち， 上位 ワー ドが 横 方向 
の ドット 数， 下位 ワード ヵ搬 方向の ドット 数です （178 ページ 図 7)。 実際に 文字を 構成す る 


,y 1 


右 マージ ン 


左 マ I ジ ン 
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main ( ) 


{ 

int ••• 

, .j 


タブ サイズ 

C 


■図 6 窨式閫 係の 数値の 意味 


改行 幅 


実際に 印刷を 行う 範囲 


1 ページの 行数 


• 1 行文 字数- 


■図 7 半角， 全角 文字の 縦横の ドット 数 

半角の 場合 


八 縦 


縦の ドット 数 


横の ドッ ト 数十 余白 

ドット の 数 だけでは なく， 文字 数 調整 用の 余白 も 含め て 指定 します。 

；14) カラー 印刷の 色 種類 

プロセス 印刷 時の 色の 表現の しかた を 意味 しています。 

〔15) プリント マネージャの バージ ヨン 

プリ ント マネージャの バージョンを 意味し ます。 SX 1.10 の プリ ント マネー シャの バージ ョ 
ンは 1.00 なので， ここには $0100 という 数値が' 入る のが 普通です。 

(16) プリンタ ドライバの バージ ヨン 

プリンタ ドライバの バージョンを 意味し ます。 SX 1.10 に 付属す る プリンタ ドライバの バー 
ジョンは いずれも 1.00 なので， ここには $0100 という 数値^ が 入る のが 普通です。 

(17) 印刷 範囲 開始 ページ 

(18) 印刷 範囲 終了 ページ 
現在は 使用され ていません。 

(19) ユーザ 用の データ 


C 16 

E K 5 

D J 4 

c I 3 

B H 2 

A G 1 
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(20) ユーザ 用の 予約 領域 

アプリ ケー ショ ンが 自由に 使用す る こと 力す でき ます。 

(21) 印刷 開始 ページ 

(22) 印刷 終了 ページ 

印刷を 開始す る 前に アプリケーションが 指定し ます。 

ページは 1 ページから 始まり， デフ オルトでは 1 〜 999 ページまでを 印刷す るよう に 設定 
されて います。 

ページ 印刷の 場合は， 任意の ページ 番号を セ ット する ことで 正しく 印刷の 開始/終了 力す 行わ 
れ ますが， コード 印刷の 場合， 印刷 開始 ページは デフ オルトの 1 から 変更して はいけ ません。 

(23) 1 ページ あたりの 印刷 枚数 

1 ページを 何 部 印刷す る かを， 印刷を 開始す る 前に アプリ ケー ショ ンが 指定 します。 

(24) 印刷 モード 

印刷の モードを 指定し ます。 1 ワードの 各ビッ トが 意味を 持ち， 1 になって いる 印刷 モード 
が賓効 となります。 印刷を 開始す る 前に アプリ ケー シヨ ンが 指定 します。 


bitO 

ドラフ ト 印刷 （ドッ トを 間引く） 

bitl 

カラー 印刷 


(25) 印刷 モードの マスク 

プリ ンタの 種類に よ っては 印刷 モー ドを 制限す る 必要が あ ります。 この マスクと 印刷 モード 
を AND した も のが 実際の 印刷 モード となります。 

こ の 値は プ リン タ ドライ バが 設定す るので， 変更して はいけ ま せん。 

(26) 現在 印刷 中の ページ 

(27) 現在 印刷 中の 部数 

現在 印字 中の ペー ジに 関す る 情報が プ リン タ ドライバ、 によって セットされ ます。 

以」 1 のよう な 情報は， アプリケーションが 自分で 用意した 値に よって 設定す る こと もで きま 
す。 しかし， 場合に よっては， たがいに 矛盾す る 情報を 設定して しま うこと も 考えられます* 6 。 
印刷 _ レコード 内の 情報が できるだけ 正確になる ように， また， そのための アプリ ケー ショ 
ンの 負担を でき る だけ 軽減す るよう に， プリント マネージャ にはい く つかの 便利な 機能が 用意 
されて います。 

*6 : 用紙を はみだす ような 丨 行の 文字 数 や， 異常な レク タング ルの 数値な ど。 

( a ) 印刷 環境 レコードの 内容を チェック/酸 する 機能 

印刷 環境 レコ ー ド 内の 情報が 矛盾して いない かどう か チェックし， 不都合を 発見した 場合は 
その 値を 調整す る 機能が， $ A 4 E 5 PMValidate として 用意され ています。 アプリ ケー ショ 
ンが 値を 設定した 場合は， この SX コールに よって， その 正し さを チェック する のが 安全です。 
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( b ) デフ オルトの 印 レコードの 情報を セッ トする 機 育 6 

プリンタ ドライバ、 内部には， 印刷 環境 レコード 内に 収める デフ オルトの 情報が 用意され てい 
ます* 7 。 $A4E4 PMSetDefault によって， この 機能を 利用す る ことができます。 あら か 
じめ， この SX コールで デフ オルトの 値を セットして おいて， アプリケーションは 必要な と 
ころ だけを 書き換える ことで 労力を 減らす こ とがで きます。 

*7: コン ト ロー ル パネルで 設定した 情報が BUILTIN.LB 内の リ ソース タイプ PrEV， IDO と して 記録され 
ている 場合は， そちらを 優先的に 読み込みます。 


(C) 印刷 環境 設定 ダイアログ によって 情報を セットす る 機 ^ 

EP 刷 環境 設定 ダイアログとは， 1?3 ページの 図 3 に 示した ような ダイアログです。 この ダ 
イア ログを 利用す るた めには， $A4E6 PMImageDialog* 8 を 呼び出す だけで よく， 後の 
处理は プリント マネージャと プリンタ ドライバ、 が 行って く れ ます。 

*8:$A4E7 PMStrDialog という， コード 印刷 専用の 印刷 環境 設定 も 用意され ています が， SXI.I0 に 付属 
してきた プリ ンタ ドライバは， いずれも この 機能を サポート していません。 

本来， この SX コールでは ページ 印刷 時の 印刷 環境を 設定す る ための ダ' イアロ グが 表示 さ 
れ， その 結果が 印刷 環境 レコー ドの ページ 印刷に 関係す る 値 だけに 反映され る ことに なって い 
るよう です が， 実際には コード 印刷の 印刷 S 境 設定 も 兼ねてい ます。 


プリンタ ドライバ 


プリ ンタに 印刷を 行う のが プリント マネージャの 仕事で ある と 思って しまいが ちです が， 厳 
密 にはそう では あり ません。 プリ ント マネージャの 仕事は プリ ンタに 印刷を 行うた めの データ 
の 流れを 管理す る ことであって， プリンタ ポート への データの 出力 などは いっさい 行って いま 
せん 0 そういった 下位 レベルの 作業は， プリンタの 機種 ごとに 用意され た プリンタ ドライバが 
行って います。 

プリンタ ドライバ、 は リソースの かたちで 提供され ます。 SX1.10 には 「〇 Z シリー ズ 24： 
ピン 系」， 「ESG/P 系」， 「PC-PR 系丄 そして 「 CZ シリ ーズ 48 ピン 系」 の 4 つの プリン 
タ ドライバが 提供され ており， それぞれ リ ソース PRTD のエ D0, ： U 2, 3 として SYSTEM. 
LB に 収められて います。 これらを 「目に する」 数 少ない 機会と しては， コントロール パネ 
ルで プリ ンタの 設定を 行う 場合が 挙げられます （181 ページ 図 8)。 

プリンタ ドライバの 実態は 一種の プログラム モジュールで， 形式と しては R 型の モジ ュー 
ルに 近い かたちに なって います。 しかし， いわゆる リソースからの タスクの 起動と いうかたち 
ではなく， リソースを メモリに 読み込んで， 読み込まれた アドレスを コール するとい う， ウイ 
ン ドウ マネージャの ウインドウ 定義 関数に 近い かたちで プリンタ ドライバから 利用され てい ま 
す。 このため， ウインドウ 定義 関数 同樣 リロ ケー タブ ルで リエント ラントな コードで なけれ 
ばな り ません。 
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■ 図 8 プリンタ ドライバ （コントロールのより） 
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プリンタ ドライバの 機能の 詳細 や 作成 時の 注意な どに ついては， 198 ページの 「4 プリ 
ンタ ドライバ' の 作成」 で' 述べる ことにして， ここでは プリント マネージャが どのように プリン 
タ ドラ イノ ぐを 利用し， 印刷を 行っ ている かを 解説 ^す る ことにします。 

もっとも シンプルな 伊 IJ と して， コード 印刷の 場合を 取り上げる ことにします。 

すでに 述べた ように， 英数字 だけで 構成され た 文書で あれば， プリンタの 機種には おおむね 
関係な く， 単純に ASCII コードを 流せば， とりあえず 印刷す る こと だけは できます。 コー 
ド 印刷では， 全角 文字の 混じった 文書を 扱う ことは もちろん， ここに レイアウトの 概念を 導入 
したために， よ り 高度に プリ ンタを コント ロールす る 必要が 出て きま した。 

プリンタを コント ロー ルす る 制御 シーケンスは， プリ ンタの 機種に よって 異なって います。 
全角 文字を 打ち出す だけで も， 漢字 モードに 切り替え， JIS コードを 出力し， 漢字 モードを 
終了 するとい う 手順が 必要な わけです が， 漢字 モードへの 切り替え， 漢字 モード 終了を 指示す 
る 制御 シーケンス からしても う バラ バラです。 ま して， 改行 幅 や 文字 間隔の 制御 や ビット イ メー 
ジの 印刷な どに いたっては， どういう 状況 かは 想像に 難く ないで しょう。 

プリ ント マネージャは， アプリ ケー シ ョンから コード 印刷の 要求と とも に 印刷すべき 文書 (二 
文字列） を 受け取る と， ユーザが 自分の^* にあわせて 選択して おいた プリンタ ドライバを リ 
ソースから 呼び出し， 文字列を 渡し， 印刷 開始を 指示し ます。 プリンタ ドライバは， 文字列を 
もとに， 印刷 環境 レコー ドに したがって 文字 間隔な どを 調整しつつ， 印刷を 行います。 

ページ 印刷 や プロセス 印刷の 場合 も 同様に， プリ ント マネージャからは 上 嫩的 抽象的な デ ー 
タカ 5 ' 渡され， プリンタ ドライバは それぞれの プリンタに 実際に 印刷で きる かたちに 変換し， 出 
力し ます。 

実際に 印刷を 行う 機能の ほかに， プリンタ ドライバには 印刷 環境 レコードの 設定 （デフ オル 
卜 設定， チェック & 調整， 印刷 環境 設定 ダイア ロ グの 表示 & コント ロ ー ル） など の ユー ティリ 
ティ 的な 機能 も 含まれて います。 

これらの プリンタ ドライバ' の イ士 事は， アプリケーション 側から 見る と， プリント マネージャ 
の 仕事で あるよう に 思えます。 実際に， プリンタ ドライバの 登録 さえ すんで いるの なら， アプ 
リ ケーシ ヨンは プリンタ ドライバの 存在を 意識す る こ となく， プリント マネージャの SX コー 
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ルを 利用す る だけで 印刷を 行う ことができます。 しかし， いずれも 実際の 作業は プリンタ ドラ 
イバが 行って いて， プリント マネージャは その 間を 取り持つ のが 仕事で ある ことは， 覚えて お 
いて 損は ない と 思います。 


基本的な 印刷の 流れ 


プリ ント マネージャを 利用した 印刷は， 一定の 手順を 経て 行います。 コード 印刷の 場合， ペー 
ジ 印刷の 場合， プロセス 印刷の 場合な ど， それぞれに 少しずつ 異なって はいます が， 基本的な 
流れは どれ も 共通して います。 これを フローチャートで 表すと， 図 9 のようになります。 


■図 9 印刷の 流れ 


( START ) 


プリンタ ドライバを 
才 ー プン する 


Yes 
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最初に プリンタ ドライバを オープン する 際， すでに オープンされ ている かどう か チェックす 
るのは， タスク 間で 印刷 作業 力 5 ' 競合し ないように する ためです。 すでに オープンされ ている 場 
合は， ほかの タスクで 印刷を 行って いると いう ことです から， 印刷 fNI は 行う こと 力す でき ませ 
ん。 ェラー 用の ダイアログ などで ユーザに 警告を 出して， 印刷が できない 旨を 伝えて 印刷 处理 
を 中断し ます。 

「 EP 刷したい データを プリント マネージャに セットす る」 の 部分は， 印刷の 種類に よって 異 
なります。 コード 印刷で あれば， 文書 （文字列） の 収められた メモリ ブロックへの ハンドルを 
プリント マネージャに 渡します。 ページ 印刷なら ば， 印刷用の 仮想の グラフ ポートを 開いて， 
そこに 描画を 行う ことになります。 プロセス 印刷の 場合は， データを セットす るか わりに ユー 
ザ ー プロセスを プリント マネージャに 登録し ます。 

ここ までは 印刷の 準備の 段階で， 実際の 印刷は まだ '行われて いません。 

プリンタへの 出力は， その 次の 「$ A 4 EF PMAction を 呼び出す」* 9 を 実行す るた びに 
少しずつ 行われます。 少しずつ， という ことは， $ A 4 EF PMAction を 何度か 呼び出さな 
ければ， すべての 必要な データの 印刷は 行われな いという ことです。 不便に 思われる かもしれ 
ま せんが， こ れは タス ク マネージャ による マルチ タスク を 利用 して 印刷を 行う ための 合理的な 
仕様です 。 

*9:$A4EF PMAction は丨 ワードの 引数を 取ります。 これに よって， 印刷 作業の 中断 や 再開な どを 指示 
できる のです が， ここでは 「印刷の 続行」 を 意味す る 0 を 指定して いると 理解して ください。 


プリ ンタは MPU から 見る と 非常に 遅い デ バイ ス なので， すべての CPU 時間を 費やして 
データ を 最後まで 印刷して いたのでは 時間が かか りすぎ るう え， ほかの タ スクも 止まって しま 
います。 割り込みを 利用して 完全に バックグラウンドで 处理を 行う こと も 可能では あります が， 
ほかの マネージャと の 関係、 や， エラー 理な どの 点で 問題が あ ります。 

そこで， 印刷の {樣 を 十分 短い 時間で 実行で きる ように 細かく 分割して， 適当な 間隔を おい 
て それを 実行す る ことによって， ほかの タスクに 大きな 影響を 与える ことなく， また システム 
全体に 離を きたす こ ともなく， マルチ タスクを 生かした 印刷が 可能と なります 0 これは， 第 
1 章で 示した 「リアルタイムで K # する （ように 見える） プログラム」 と 同じ 発想です 0 

このよう な イ士 組みを 利用し て 効率よ く 印刷を 行うた めには， 印刷した い デ' ータを プリント マ 
ネー ジャに セット したら， 実際の 印刷 処理で ある $ A 4 EF PMAction は アイ ドル イベント 
で 呼び出す ようにすべき でしょう。 ほかの タスクを 止めて 印刷に 専念したい 場合 も ある と 思い 
ますが， その 場合は マウス ポインタを 踏切 ポインタに する 等， ユーザが ほかの 操作が できない 
ことを 示す ようにす べきです。 

$ A 4 EF PMAction がすべ ての 印刷を 終了した ことを 示す 値を 返して きたら， 終了 処理 
を 行って， プリンタ ドライバ、 を クローズ します 0 「印刷の 終了 処理 j は ページ 印刷での み 必要 
な & 理で すが， プリ ンタ ドライバの クローズは すべての 種類の 印刷で 行わなければ なり ません。 
プリンタ ドライバ、 が 占有す る メモリの 解放と いう 意味 も もちろん あり ますが， それと 同時に， 
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ほかの タス ク への プリ ンタ ポート の 利用 権の 移譲 という 意味 も 兼ねてい るから です。 


ページ 印刷の 仕組み： スク リブ トの 利用 


ページ 印刷では， 「印刷したい デ'— 夕を プリント マネージャに セットす る」 方法と して スタ 
リ ブトを 利用して います。 

ページ 印刷用の データの セッ トは， $ A 4 EB PMOpenlmage で 印刷用の 仮想の グラフ 
ポートを 作成す る こ とから 始まり ます。 この グラフ ポートは ビッ ト マップとは つながって おら 
ず， スクリプト を lei 录 する ためだけ の 形式的な も ので あ ると 考えて ください。 

仮想の グラ フ ポート が 作成で きたら， 直後に $ A 4 EC PMRecordPage を 呼んで スクリ 
ブトへの I 彌を 開始し ます。 

PMRecordPage を 呼び出す 際には， 引数と して レク タング ルレ コードへの ポインタを 
渡します。 この レク タング ルは， 描画を 行う 範囲を 意味して います。 注意して いただき たいの 
は， あくまでも 「描画を 行う 範囲」 であって， 「印刷を 行う 範囲」 ではない， という ことです。 
あまり 違わない ように も 思えます が， じつは 大きな 違いです。 この 違いは 印刷の 時点で 明らか 
になります。 

この 状態で'， この グラフ ポートを 通じて 行う 描画は， スクリプトに 言 ぼ 象され ます。 いつもと 
同じように， グラフィック マネージャを 利用して 図形を 描画して ください。 スクリプトへの 記 
録 中です から， 画面に 表示され る ことはありません* 10 。 こうして 描いた 図形は， ほぼ その ま 
ま プリ ンタ 用紙の 上に 印刷され る ことにな ります。 

*丨〇: もっとも， スクリプト 記録 中でなかった としても， この グラフ ポー トは ビットマップと つながっ 
ていないので， バス エラー が 発生す るの がオ チです。 

必要な 描画が すんだら， $ A 4 ED PMPrintPage を 呼び ます。 こ の 時点で ス クリプ トの 
言 £1 象は 終了し， 描画の 手順を 記録した スクリプト レコードが 残ります 0 プリンタ ドライバは， 
この スクリプト レコードを も とに 少しずつ 仮想の ビッ ト マップに ネ苗 画を 行い， プリ ンタ にあわ 
せた デ' ータ 変換を 行って 出力す る ことになります。 

さて， この 仮想の ビットマップの 大きさで すが， 印刷 環境 レコー ドに 言 ei 录 されて いる 「実際 
に 印刷を 行う 範囲」 と 等 L いと 考えて ください* 11 。 先 ほど 記録した スクリプトは， 指定した 
描_ 囲の 中で lei 象され ていた ものです が， 想の ビッ ト マップに 描画され る 際には， この ビッ 
ト マップの 大きさに あわせて 披大 •縮小が 行われます。 ここで 「描画を 行う 範囲」 と 「印刷を 
行う 範囲」 の 違いが 表れて きます。 

*丨丨： しかし， 印刷を 行う 範囲が 大きかった 場合， その 全体が 収まる ような ビットマップを メモリ 中に 
作成す ると， とてつもなく 大きな 領域が 必要になる ことがあります。 この 対策は， 次の プロセス 
印刷のと ころで 明らかになり ます。 
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たとえば， 描 醜 囲 （〇, 〇) - (£56, 256) の 状態で， （ S 5 6， 0) - (0， £56) という， 描 
画 範囲 いっぱいの 対角線を 引く ような スクリプトを 言觸 したと します。 それが， （0, 0)-(1440, 
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144 0) のビッ ト マップ 上に 觀 された 場合は 拡大 •縮小が ほどこされ， (1440, 0)-(0, 1440) 
の， 印刷 範囲 いっぱいの 対角線と して 印刷され る ことにな り ます。 

つまりは， 描画 範囲 いっぱいの 描画を 記録 すれば， （プリンタ 用紙 いっぱいに 印刷 範囲が 設 
定 されて いた 場合には） プリンタ 用紙 いっぱいの 印刷が 行われる， という ことです。 



コード 印刷 や ページ 印刷は， 「データを 用意す る」— 「用意した データが 印刷され る」 とい 
う， わかりやすい 印刷 方法で ある わけです が， プロセス 印刷は 多少 趣きが 異なります。 

プロセス 印刷では， 印刷す る データは 用意し ません。 そのかわり， 印刷すべき データを 生成 
する ルーチンを 用意し ます。 これが ユーザー プロセスです。 

プロセス 印刷で 印刷が 行われる のは， 印刷 環境 レコードの 中の 「実際に 印刷が 行われる 範囲 
を 示す レ クタ ン グル」 の 内部です。 これと同じ 大きさ の 仮想 ビ ット マッ プ/ グラ フ ポートが 用 
意され るので， ユーザー プロセスは グラフィック マネージャ なり， 独自の 描画 ルーチン なりで 
印刷したい 画像 や 図形を 描画し ます。 ここに 描画され たもの が， そのまま 紙の 上に 印刷され る 
こ とに なり ます。 

ただし， 実際にそう いった ビットマップを メモリ 上に 作成した 場合， 非常に 多くの メモリが 
必要と なる 場合が あります。 このため， これを ある 大きさの 「帯」 に 分割し， それを 1 本ず 
つ 描画して 印刷す る ことを 繰り返す ことにします。 こうして おけば， メモリ 上の ビットマップ 
は 1 本の 「帯」 の 分 だけ 用意して おけば すみます （図 1 〇)。 

■図 10 プロセス 印刷の 仕組み 




「帯」 の サイズは， 横 方向は 印刷を 行う 範囲と 同じ， 縦 方向は プリンタの 印刷 ヘッドの ピン 
の 本数です* 12 。 つまり， 印刷す る 範囲 力 ? 横 256 ドット， 縦 264 ドッ トであった 場合，^: 
ピンの プリンタ 用 ドライバ、 の も とでは， 1 本の 「帯」 の サイズは 横 256 ドット， 縦 24： ドッ 
卜 という ことにな り， 全 印刷 範囲を 印刷す るた めには， この 「帯 j を 11 本 描画 すれば よい こ 
とになります （186 ページ 図 11>。 
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* 12: 現在 提供され ている プリンタ ドライバは すべて シリアル プリ ンタ 用な のでよ いと して， 将来 ペー 
ジ プリンタ 用の ドライバが 提供され た 場合， 「ピンの 本数 j という 表現は 適当では ないか もしれ 
ません。 


■図 11 ビットマップの 分割 


24 ドッ 
X 11 本 


264 ドット 



(0,0)-(256,24) 
•(0,24) -(256,48) 

I 


(0,240) (256,264) 


ユーザー プロセスが 砰び 出される のは， アプリケーションが $ A 4 EF PMAction を 呼び出 
したと き です。 このと き， ユーザー プ ロ セスには スタ ッ ク 経由で 次の よう な 引数が 渡さ れ ます。 

long prHdl ，•印刷 環境 レコードへの ハンドル 

long frameRect ; 印刷 範囲を 意味す るレク タング ル 


このほかに， 呼び出された 時点での カレント グラフ ポートと して， 仮想の ビットマップへの 
グラフ ポートが セッ トされて います。 この ビッ ト マップ/グラフ ポートの ビッ ト マップ レ クタ 
ング ルには 「帯」 のレク タング ルが セットされ ている ので， ここを 調べる ことで ユーザー プロ 
セスは 描画 庫 5 H 中の どの 部分を 描画す る ことが 求められ ている のかを 知る ことができます。 

グラフィック マネージャ や 自前の ルーチンで 適切に 描画を 行い， それが 終了したら， 返り 値 
として DO に 0 を 入れて RTS します。 ユーザー プロセスが 終了す る と， プリ ント マネージャ 
と プリンタ ドライ パ、 は， ビッ ト マップの 内容を 各 プリ ンタに 適合した かたちに 変換し， 制御 シー 
ケン ス を 付力卩 したう えで 出力/印刷 します。 

1 つの 「帯」 を 出力 し 終わる と， プリ ント マネージャは ビッ ト マップの 位置を 1 つ 下の 「帯」 
に 移動させます。 まだ 描画/印刷すべき 「帯」 が 残って いる 場合は 「印刷 中」 の 意味の 値を， ま 
た， すべての 「帯」 を 描画/印刷 したと 判断した 場合は 「印刷 終了」 の 意味の 値を 持って， 
PMAction を 終了 します。 

先 ほどの， £4 ピン プリ ンタ の， 横 256 ドット， 縦 264 ドッ トの 印刷 範囲の 例で あれば， 
ビッ ト マップの レク タング ノレは 次 ページの 表の よう に 遷移す る こと にな ります。 
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PMAction を 
呼んだ 回数 

ビッ ト マップの レク タング ル 

1 回目 

(0， 0) - (256, 24) 

2 回目 

(〇, 24) - (256, 48) 

3 回目 

(0, 48) - (256, 72) 

丨〇 回目 

(0, 216) - (256, 240) 

II 回目 

(0, 240) - (256, 264) — これを 印字し 終われば 終了 

< 終了 > 



この 例の ように， 印刷 範囲の 縦の ドッ ト 数が ピンの 本数で 割り切れる 場合は よいので すが， 
端数が 出る 場合は 少し 注意す る 必要が あります。 たとえば， 横 256 ドット， 縦 265 ドット 
であった 場合は， ビッ ト マップの レク タング ルは 次の 表の ように 遷移し ます。 


PMAction を 
呼んだ 回数 

ビッ トマ ッ プの レク タング ル 

1 回目 

(0， 0) - (256， 24) 

2 回目 

(0， 24) - (256, 48) 

3 回目 

(0， 48) - (256， 72) 

丨〇 回目 

(0， 216) - (256， 240) 

丨 丨 回目 

(0, 240) - (256, 264) 

12 回目 

(0, 264) - (256, 288) 

く 終了 > 



1 ドットは みだした ために， PMAction を 1 回 多く 呼ばなければ なら なくなって います。 
しかも， 下線で 示した ように， 1£ 回目の 時点での ビットマップの レク タング ノレは， 残って い 
る 1 ドットより も 大きな ものに なって います。 

このような 場合の ために， スタック 経由で 渡された 印刷 範囲の レク タング ルを チェックして， 
必要な 部分 以外には ネ苗 画を 行わない よう にす る 必要が あり ます。 

同様に， 横 方向の ドット 数が 16 の 倍数で ない 場合， ビットマップの 右端に 不要な ビットが 
生じます (図 12)。 これらの ビットを マスクす る 処理を 行 うの も ユーザー プロ セスの 責任です。 
■図 12 ビッ ト マップの 右端の 不要な ビット 

例： 描画 範囲の 横が 250 ドット の 場合 

250 ドット 不要な ビット 

i 

00000000 00000000 00000000 ((OOxxxxxx 
00000000 00000000 00000000 )) OOxxxxxx 

32 バイ ト 
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プ U ント マネージャの 利用 


プリ ント マネージャを 利用して 各種 印刷を 行う 場合の コードの 書き方に ついて 述べます。 
ハードコピー 以外に ついては， 182 ページの 図 9 に 示した フローチャートが 基本と なり ま 
すので', その 丨巟れ を 把握して おいてく だ' さい。 


ー ド 印刷 


コード 印刷では， 補 己 置 可能 ブロックの 中に 収められ ている 文書 （文字列） が 印刷の 対象と 
なります* 13 。 文書と いっても， いわゆる テキスト ファイル 形式で， 文字コードと 下の 表に 示 
し た 一部の コントロール コー ド 以外は 利用で きないと 考えた ほうがよ いでし よう。 

* 13: 疑似 ハン ドル も 使用可能です 


コント ロ ー ルコ ー ド 

意 味 

TAB ($09) 

FF ($0C) 

CR ($0D) 

水平タブ 
改 ページ 
改行 


ASCIIZ 型で も LASCII 型で もない， 文書の バイ ト 数を 別に 指定す る 形式の 文字列です 
から， 文字列の 終端を 意味す る $00 や， 文字列 長を 意味す る 先頭の 1 バイトな どは 必要 あり 
ません。 

コードの 例は， こうした 文字列が 収められ ている 再配置 可能 ブロックが すでに 存在し， その 
ブロ ック への ハンドルが ワーク strHdl に， 文字列 長が シンボル STRLEN に 定義され て 
いる ことを 前提と して 示す ことにします。 

最初に 行う のは， プリンタ ドライバの オープンです。 これには $ A 4 E £ PMOpen を 使い 
ます。 リソース PRTD の ID 番号を 指 1 定 する ことにより， どの プリンタ 用の ドライバを オー 
プン する かを 選択す る ことが 可能です が， よほど 特別な 場合で ないかぎ り， 才ー プン する ドラ 
イバは コントロール パネルに よって 選択/登録され ている ものを 利用す る こ とになります 。こ 
の 場合， ID 番号と して- 1 を 指定 します* 14 。 

* 丨4: コン ト ロー ル パネルで 選択した プリ ンタ ドライバの ID 番号は SRAM に 記録され ています。 プリ 
ンタ ドライバの オーブン 時に- 丨 を 指定した 場合， SRAM を 参照して プリ ンタ ドライバを オープン 
します。 

CodePrint : 

move.w 
SXCALL 
addq.l 


# -l ， -(sp) 

$A4E£ 

#2,sp 


* PMOpen 
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このと き， 返り 値と して- 1 が 返って きた 場合は， プリント マネージャで なんらかの エラー 
が 発生して おり， また -Z が 返って きす こ 場合は， すでに プリンタ ドライバが オープンされ てい 
る ことを 意味して います。 いずれにせよ， 負の 数の 場合は オープンに 失敗して いるので， 印刷 
处理を 中断し ます。 

tst.l dO 

bmi CodePrint Abort * 印刷 処理を 中断 

次に， 印刷 環境 レコー ドを 作成し ます 0 印刷 環境 レコードは ハンドルで 指定す るので， ヒー 
プ ゾーンに SS 己 置 可能 ブロック として 作成す る ことにします。 

move.l # $8e,-(sp) * 印刷 環境 レコ ー ドの サイズ 

SXCALL $A021 氺 __ MMChHdINew 

addq.l # 4,sp 

move.l dO,prHdl(a5) 


印刷 it% レコード 内部の If 報を セットし ます 0 まず， デフ オルトの It 報を セットして おき， 
必要が あれば （ユーザからの 要請が あれば)， 印刷 環境 設定 ダイアログを 表示し ます。 ここで 
は， ユーザの 要請に よらず， かならず 印刷 環境 設定 ダイアログを 出す ことにします。 


move.l 

prHdl(a5),-(sp) 


SXCALL 

$A4E4 

ホ PMSetDefault 

addq.l 

#4,sp 


move.l 

prHdl(a5),-(sp) 


SXCALL 

$A4E6 

氺 PMImageDialog 

addq.l 

#4,sp 



本来は コード 印刷を 行って いる わけです から， $A4E6 PMImageDialog ではなく， 
$A4E7 PMStrDialog を 使うべき なのです が， 注で も 述べた ように， 現在 提供され ている 
プリ ンタ ドライバは PMStrDialog を サポート していない ので， PMImageDialog を 使っ 
ています。 

$A4E6 PMImageDialog は， 内容に 変更が あった 場合は： U 変更がない 場合は 0， エ 
ラー の 場合は- 1 を 返します。 変更され ていた 場合， それを リソースに 保存して おきたい のな 
ら， 次の ような コードを 書く とよいで しよう。 


tst.l dO * 変更が あった？ 

beq CodePrintO * なければ CodePrintO へ 
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move.l prHdl ( a 5),-( sp ) 

SXCALL $ A 4 P 8 * — PMSaveEnv 

addq.l ft 4 ,sp 

CodePrintO : 

さらに レコードの 内部に 変更を 加えたい 場合は， 直接 操作して しまっても かまいません。 し 
かし， その 場合， 設定に 矛盾がない かどう 力 \ チェック する ために $A4E5 PMValidate 
を 呼ぶ よ うにして く すごさい。 

印刷 環境 レコードの 設定が 完了した ので， 次は 印刷す る 文字列を プリ ント マネージ ャに 渡し 
ます。 これには $A4F1 PMDrawString を 使います。 


move.l 

# 0,-( sp ) 

* 最後に 改 ページを 行う 

*1 を 指定した 場合は 改 ページし ない 

move.l 

# STRLEN .-( sp ) 

* 文字列の バイ ト 数 

move.l 

strHdl ( a 5),-( sp ) 

* 文字列への ハン ドル 

move.l 

prHdl ( a 5)，-( sp ) 

* 印刷 環境 レコー ドへの ハンドル 

SXCALL 

$ A 4 P 1 

* PMDrawString 

lea 

16( sp)，sp 


St 

printActive ( a 5) 

* 印刷 中 フラグを 立てる 


以上で 準備は 終了です。 実際の 印刷は， $A4EF PMAction を アイ ドル イベントで 呼び 
出す ことで 行います。 アイ ドル イベントで PMAction を 呼ぶべき かどう かを 判断す るた め 
の フラグと して， 変数 printActive を 用意し， これが 立って いる 場合は PMActive を 呼 
ぶよ うにして います。 


IDLE : 

tst.b 

printActive ( a 5) 

* 印刷 中？ 


beq 

ェ DLE 9 

* でなければ IDLE 9 へ 


move.w 

# O .-( sp ) 

* 「印刷 続行」 


SXCALL 

$ A 4 EP 

* PMAction 


addq.l 

#2 ,sp 



tst.l 

dO 

* 印刷 終了？ 


beq 

CodePrintPinish 

* ならば CodePrintFinish へ 

IDLE 9 : 

moveq 

rts 

#040 
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印刷が 終了 したと 判断で き た 場合は， CodePrintFinish で プリンタ ドライバを クロー ズ 
して 印刷 处:理 の すべてを 終了 します。 

CodePrintFinish : 

SXCALL $A4E3 氺 —PMCIose 

sf printActive(a5) * 印刷 中 フラグを おろす 

bra IDLE9 

印刷 環境 レコ ー ドを 収めた メモリ ブロ ックを 廃棄した りする こと も 忘れずに 行って く ださい。 


ページ 印刷 


コード 印刷と ページ 印刷では， プリンタ ドライバの オープンから 印刷 環境 レコードの 設定 ま 
で， そして PMAction まわりは ほとんど 共通して いるので， それ 以外の 部分に ついて 述べ 
る ことにします。 

こ こでは 印刷 環境 レコ ー ドの 設定が 終了 した 直後から 始めます。 

ページ 印刷で 最初に 行う のは， $ A 4 EB PMOpenlmage で 仮想の グラ フ ポート を 作成す 
る ことです。 この結果， 正常に 作成で きた 場合は， 返り 値と して A 0 に グラフ ポートへの ポ 
インタ カ ? 返ります。 この ポインタを 直接 利用す る ことは あまりな いと 考えられます が， いちお 
う ワークに 保: 存 して おきます。 

PagePrint : 

： (ここで ドライバの オープン， 印刷 環境 レコ ー 

ドの 設定な どが 行われる） 

move.l prHdl(a5) ， -(sp) 

SXCALL $A4EB *__PMOpenlmage 

addq.l # 4,sp 

move.l aO,graphPtr(a5) 


この 状態で， カレント グラフ ポートは， この 仮想の グラフ ポートに なって います。 

続いて， スクリプトの 言 £1 录を 開始し ます 0 このと き 指定す る 描 _ 囲の レ ク タング ノレへの ポ 
インタは， どこかに ある レク タング ノレ レコード frameRect の アドレスを 指定す る こ とに し 
て， それ 以」: の 牛は 特定し ない ことにします。 


pea frameRect 

SXCALL $A4EC 


* 描画 範囲を 示す レ クタ ン グルへの 
ポインタ 

* PMRecordPage 
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addq.l # 4,sp 

以降， グラフィック マネージャの SX コールを 呼び出して， 描画を 行います。 

スクリプトに 言 录 される SX コー ルで あれば， ほとんどの ものが ?丨〗 用で きます が， ビット 
マ ップの 変更と ホーム 位置の 移動は 行って はいけ ません。 

ここで 描画を 行う 際は， 次の 条件の ビットマップに 描画す るつ も りで 行って ください。 


•テキスト タイプ 

描画す るイ メー ジ 等は テキスト タイ プで 行って く ださい。 

• ページ 数は 1 (白黒 プリ ンタの 場合)， または 3 (カラー プリ ンタの 場合） 

ページ 数 1 の 場合は， カラー 0 が 白， カラー 1 が 黒と して 印刷され ます。 

ページ 数 3 の 場合は， 描画 色が プリ ンタの カラー コード 〇〜 7 に刘 •応 します。 

デフ ォルトの 状態では， ペンの 色， フォントの 色は 黒， 背景が 白と なって います。 

必要な 描画が 終了した ら ，スクリプト の を 終了し， 印刷 データと して プリント マネージャ 
に セット します。 これには $ A 4 ED PMPrintPage を 使います。 PMPrintPage は ロン 
グ ワードの 弓丨 数を 取り ますが， かならず 0 を 指定す る ことに なって います。 

clr.l -(sp) 

SXCALL $A4BD * —PMPrintPage 

addq.l # 4,sp 


Rh で 印 fiij すべき データの セットは 完了です。 後は コード 印刷と 同樣 アイ ドル イベントで 
PMAction を 呼び 続ける こ とで 実際の 印刷を 行う こ とがで きます。 

たた ^ 一点， コード 印刷と 異なる のは， プリンタ ドライバを クローズ する 前に， $ A 4 F 0 
PMCloselmage を 使つ て ft 想の グラ フ ポートな ど を 廃棄す る 必要が あ ります。 


GodePnntPimsh : 



SXCALL 

$A4P0 

* PMCloselmage 

SXCALL 

$A4E3 

*__PMCIose 

sf 

printActive(a5) 

* 印刷 中 フラグを おろす 

bra 

IDLE9 
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プロセス 印刷を 行う 手順は， ほかの 印刷と それほど 変わる ものでは あり ません。 

印刷の 準備では， ドライバの オープン， 印刷 環境 レコードの 設定は ほかの 印刷と 共通です。 
ほかの 印刷が データを セツ トする ところで， プロセス 印刷では ュー ザー プロセスの 登録を 行 
います。 

ProcPrint : 


pea userProc ( pc ) 

move.l prHdl ( a 5)，-( sp ) 

SXCALL $A4FA 
addq.l # 8 ，sp 


(ここで ドライバの オープン， 印刷 環境 レコー 
ドの 設定な どが 行われる） 

* ュ ー ザ ー プロ セ ス への ポインタ 

* PMProcPrint 


以上で 準備は 終了 です。 後は コー ド 印刷と 同様に アイドル イベントで PMAction を 呼び， 
終了したら， ドライバ、 を クローズ します。 

問題は， どのように ユ ー' デ ー プロセスを 書く 力％ です。 

ユーザー プロ セ スで は， 「プロ セス 印刷の 仕組み： ユーザー プロセス」 で 述べた よう な 処理 
を 行う わけです が， ここでは 例と して， 印刷 範囲を 1 ラインず つ $00, $01, …… という ビッ 
ト ハ 。ターンで' 埋めて みる こ とに します。 

ユーザー プロセスで 描画を 行う ビットマップは， ページ 印刷 同様 1 ページ， あるいは 3 ペー 
ジの テキスト タイプです。 ここでは 話を かんたんに する ために， 1 ページで ある ことを 想定し 
ています。 この場合， ビットマップ 中の 1 になって いる ビットの 部分が 黒， 0 の 部分が 白で 
印刷され ます。 

まず 最初に， スタック 経由で 渡されて いる 引数を 受け取る こと にします 。ユーザー プロセスの 
中では レジスタを 破壊しても かまわない ので、， 引数は A 3 と A 4 に 収めて おく ことにします。 


userProc : 



move.l 

4( sp ), a 4 

* 印刷 環境 レコード への ハン ドル 

move.l 

8( sp ), a 3 

* 描画 範囲の レ クタ ン グルへの ポイ 

ンタ 


続いて， 現在 描画すべき 範囲を 知る ために カレン ト グラフ ポート を 得ます。 

SXCALL $A132 * GMGetGraph 

move.l a 0, a 2 * カレン ト グラフ ポー トへの ポインタ 
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グろフ ポート レコードの 先頭の ビッ ト マップ レコードへの ポインタを 得て， 描画すべき 範囲 
などの 数値を 計算し ます。 


move.l (aE),aO 

move.w 4(a0),dl 
move.w 8(a0),d2 

move.w 6(a3),d0 

cmp.w d£,dO 

bge userProcO 

move.l d0，d2 

userProcO : 

sub.w dl，d2 

subq.w # l，d2 

and.w # $ff，dl 

moveq # 0，d0 

move.w 6(a0)，d0 

sub.w 2(a0),d0 

divu # 8,d0 

swap dO 

move.b # $ff,d4 

lsr.w d0,d4 

not.b d4 

move.w 14(a0)，d3 

move.l 10 (aO)，al 


* ビット マップへの ポイ ンタ 
*Y 先頭 

* Y 終端 

* 描画 範囲の Y 終端 
* 描画 範囲の ほうが 広い？ 

* ならば userProcO へ 


*D2 : ライン 数- 丨 

*DI : この ラインの ビッ ト パターン 


* (X 終端 

* -X 先頭） 

本 -r 8 

* 半端な ドット 数 


*D4 : 右端の 丨 バイ ト 用 マスク 

*D3 : I ラインの バイ ト 数 

*AI : ビットマップの ベース アドレス 


以上で 描画に 必要な 数値は 得られた ので， 描画を 行います。 


userProcl : 

move.w 

d3,d0 

*1 ラインの バイ ト 数一 ►カウンタ 

subq 

#140 

氺 DBRA 用に- 丨 

move.l 

al,aO 

* ベース ア ドレス— ポインタ 

userProc2 : 

move.b 

dl，(aO) + 

* ビッ ト マップに 書き込む 

dbra 

dO.userProcS 

*1 ライン 全部に 書き込む まで ループ 

and.b 

d4,-l(a0) 

* 右端の 不要な 部分を マスク 

lea 

(al,d3),al 

* 次の 行へ 
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addq.w # l.dl * 次の 行の ビット パターン 

dbra d2，userProcl * すべての ラインに 書き込む まで 

ループ 

描画が 完了したら， DO に 0 を 又め て RTS します。 


moveq # 0，d0 
rts 


参考までに， このような ユーザー プロセスを 登録した 場合の 印刷 結果を 図 13 に 示して おき 
ます。 



テキス ト ファイルの 印刷 


リ ソース PRTM を 利用して テキス ト ファイルを 出力す る 方法に ついては， 前著 『SX- 
WINDOW 〜』 泣 2 ページで 述べました が， 文章に よる 解説 だけでした ので， ここで コード 
例を 示して 補足して おきます。 解説は 省略して， コード 例の みを 示して おきます ので， 『SX- 
WINDOW-j, あるいは 注^を 参照、 してく だ' さい。 

TextPrint : 


move.w 

# -l,-(sp) 

* すべての タスクを 検索 

pea 

prtManName(pc) 

* f prtman.r’ という タスク 名を 

SXCALL 

$A3P4 

* _ 一 TSFindTskn 

addq.l 

#6,sp 


tst.w 

dO 

* すでに 存在す るか？ 

bge 

TextPrintO 

* 存在す るなら TextPrintO へ 

clr.w 

-(sp) 

*ID ： 0 
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move.l 

# ， PRTM ，， 初） 

氺 TYPE : PRTM 

clr.l 

-(sp) 

* 環境 

clr.l 

-(sp) 

* コマンド ライン 

pea 

prtManName(pc) 

* タスク 名： ’prtman.r’ 

move.w 

# $0001, -(sp) 

* リソ ー ス から 読み込み/起動 

SXCALL 

$A351 

*__TSFock 

lea 

20(sp),sp 


TextPrintO : 

move.w 

dO,prtManID(a5) 

* タスク ID を 保存 

pea 

msgRec(a5) 

* メッセージ レコード を 作成す る 場 
所 

clr.w 

-(sp) 

氺 Hmodel : 0, Hmode2 : 0 

move.w 

# $6e ， -(sp) 

* メ ッ セージ コード： $6e 

move.l 

# 4,-(sp) 

* コマンド コード： 4 

pea 

fileName(pc) 

* 印刷す る ファイル 名 （ ASCIIZ) 

SXCALL 

$A361 

氺 TSMakeEvent 

lea 

16(sp),sp 


TextPrintl : 

move.w 

# l,-(sp) 

* 返事 要 

pea 

msgRec(a5) 

* メッセ ~~ ジ レコ ー ド 

move.w 

prtManID(a5),-(sp) 

*PRTM の タスク ID 

SXCALL 

$A35F 

* TSCommumcate 

addq.l 

#8,sp 


cmp.w 

# $ffff,dO 

* エラー ? 

beq 

TextPrint9 

* ならば TextPrint9 へ 

cmp.w 

# $fffe,dO 

* 受け付けられなかった？ 

beq 

TextPrintl 

* ならば TextPrintl へ 

cmp.w 

# $71,msgRec + 14(a5) 

* 返事の イベント コー ドは $71 ? 

bne 

TextPrint9 

* でなければ TextPrint9 へ 

move.l 

taskID(a5),dO 

* 自分の タスク ID 

cmp.w 

msgRec + 4(a5),d0 

* 引数 1 は 自分の タスク ID? 

bne 

TextPrint9 

* でな ければ TextPrint9 へ 

pea 

msgRec(a5) 

* メッセー ジレ コード を 作成す る 場 
所 

clr.w 

-(sp) 

氺 Hmodel : 0 ， Hmode2 : 0 

move.w 

#$6f,-(sp) 

* メ ッ セージ コード： $6f 

clr.l 

~(sp) 

* 引数 2 なし 
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TextPrint3 


clr.l 

-(sp) 

* 引数 丨 なし 

SXCALL 

$A361 

*__TSMakeEvent 

lea 

16(sp),sp 


move.w 

# 0,-(sp) 

* 返事 不要 

pea 

msgRec(a5) 

* メ ツセー ジ レコー ド 

move.w 

prtManID(a5),-(sp) 

*PRTM の タスク ID 

SXCALL 

$A35P 

* TSCommunicate 

addq.l 

#8,sp 


cmp.w 

# $fffe,dO 

* 受け付けられなかった 

beq 

TextPrint3 

* ならば TextPrint3 へ 


TextPrint9 : 


prtManName : 

dc.b 


’prtman.r’,0 


八 ー ドコ 


リソース PRTM の IDO を prtman.r の 名前で 起動す る ことによって， デスク ト ップ全 
体を ハ— ド コピーす る ことができます。 このと き， コマンド ラインと して -H を 指* 定 する 必要 
があります。 

このと きの コードは 次のように なり ます。 


HardCopy : 


HCOption : 

prtManName : 

dc.b 


move.w 

# Or(sp) 

* リ ソース ID : 0 

move.l 

# ， PRTM ，， -(sp) 

* リ ソース タイプ： PRTM 

clr.l 

~(sp) 

* 環境への ポインタ 

pea 

HCOption(pc) 

* コマンド ライ ン への ポ インタ 

pea 

prtManName(pc) 

* フ アイ ルネー 厶 への ポイ ンタ 

move.w 

# $00_01 ， -(sp) 

* 起動 モード： リ ソースから 起動 

SXCALL 

$A351 

氺 __TSFock 

lea 

20(sp)，sp 


dc.b 

2 ，， -H’ 



•prtman.r*, 0 
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プリンタ ドライバの 作成 


新しく プリンタ ドライバ、 を 作成す る というの はまれで ある と 思われる ので， プリンタ ドライ 
ベが 満たすべき 仕様を 示す のみに と どめ て ぉきます。 


ドライバの 形式 


ドライバは リ ロケータ ブルで リエン ト ラントに つく られ ていなければ なり ません 0 SX 1.02 


の 名残りで R 型の プログラム モジュールに 似た ヘッダを 先頭に 置 〈必要が あり ますが， モ 
ジュール として 起動され る ことはありません。 

ヘッダの 形式は 以下のと おり です 0 


オフセット 

欄 名 

内 容 

+ $00.1 

pType 

固定 文字列 

+ $04.1 

pcSize 

プログラム エリ アの サイズ 

+ $08.1 

pExec 

スター ト アドレス オフセット （ダミー） 

+ $0c.l 

pdSize 

ワーク エリアの サイズ 

+ $10 

pRsv 

システム 予約 （3 ロング ワード） 

+ $lc.l 

prtDrvrName 

プリンタ 名 （ASCIIZ) への オフセット 

+ $20.1 

prtDrvrStart 

ドライバ スタート アドレス オフセット 

+ $24.1 

prtDrvrlype 

固定 文字列 PRTD 

+ $28.w 

prtDrvrVer 

ドライバの バージ ヨン 

+ $2a.w 

prtDrvrExt 

システム 予約 


ドライバの コン ト ロール 


プリント マネージャが ドライバを 利用す る ときには， ドライバ、 スタート オフ セツ トで 示され 
た エントリを 呼び出します。 その 際， A 0 には パラメータ 領域への ポインタが 収められて いま 


す 0 


パラメ ータ 領域の 形式は 以下のと おり です。 


オフセット 

欄 名 

内 容 

+ $00 .w 

command 

ドライバ コマンド 

+ $02.1 

Pi 

パラメータ 1 


+ $06.1 

P 2 

パラメー タ 2 

.コマンド によつ て 意味が 異なる 

+ $0 a.l 

P 3 

パラメー タ 3 


+ $0 e.l 

p4 

パラメー タ 4 



ドライバ コマンド 


ドライ パ、 コマンドは， 次の 17 彳固力 qm します 0 
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• command=0: PZ_NIT 

ノ 、。ラメー タ 

なし 

返り 値 

DO 丄 =0 正常終了 
=-1 異常終了 
プリンタ ドライバ、 を_ 化; します 0 

• command=l : PZ_TINI 


ノ 、。ラ メータ 

なし 

返り 値 

D 0 .L 

=0 

正常終了 


=-1 

異常終了 


プリンタ ドライバの 終了 处理を 行います 0 


• command=8: PZ_CTRL 

ノ 、。ラ メータ 

pi サブ コマンド 

p 2 パラメータ 1 

p 3 パラメータ £ 

p 4 パラメ ータ 3 

返り 値 

DO.L =0 正常終了 

=-1 異常終了 

サブ コ マンドに よっ て 指定 した プリンタ の 直接 制御を 行います。 

• サブ コマン ド = 0 : PD_RESET 
プリ ンタを 初期 イ匕 します。 

•サブ コマンド =| : PD_CRLF 

改行し ます 0 パラメータ 1 には， 1/120 イ ンチ 単位で 改行 幅が 入り ます。 ハ。 ラ メータ 1 
が- 1 の 場合は; 1/6 イ ンチ 改行を 行います 0 
• サブ コマン ド = 2 : PD FF 
改 ページし ます。 

• サブ コマン ド =3 : PD_THRU 

ハ。 ラ メータ 1 には 印刷 g レコードへの ハン ドル， ハ。 ラメー タ £ には デ、ー タ への ハンド 
ル， パラメータ 3 には データの バイ ト 数が 入り ます 0 パラメータで 指定した データを， そ 
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のま ま プリ ンタに 出力し ます。 


• command =3 : PZ 一 DEFAULT 

ノ 、。ラ メータ 

pi 印 レコ ー ドへの ハンドル 

返り 値 

DO.L =0 正常終了 

=-1 異常終了 

A 0 .L 印刷 環境 レコードへの ハンドル 
印刷 g レコードに デ、 フ オルトの 情 韻を セツ ト します。 

• command =4 : PZ_VALIDATE 

ノヽ 。ラ メータ 

pi 印刷 環境 レコードへの ハンドル 

返り 値 

D 0 .L =1 正常終了： 変更した 

=0 正常終了： 変更せ ず 
=-1 異常終了 

A 0 .L 印刷 環境 レコ— ドへの ハンドル 

印刷 環境 レコード 内の 情報が 正い、 かどう か チェックし， 正しく なぃ 場合は 調整し ます。 
201 ページ 図 14： の フロー チャー ト のよう な 流れで チェック/調整を 行います。 


• command =5 : PZJMGDLOG 

ノ 、。ラ メータ 

pi 印刷 勸竟 レコードへの ハンドル 

返り 値 

D 0 .L =1 正常終了： 変更した 
=0 正常終了： 変更せ ず 
=-1 異常終了 

A 0 .L 印刷 潔 境 レコ ー ドへの ハンドル 

ページ 印 届 _ の 印刷 環境 設定 ダイアログを オープンし， マウスに よる 操作に したがって 印刷 
環境 レコードの 内容を 変更し ます。 
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■図 14 PZVALIDATE の 処理の 流れ 




第 3 章 新設され た マネージャ 

• command=6 : PZ—STR □し 0G 

ノ、 0 ラ メータ 

pi 印刷 環境 レコ- ドへの ハンドル 

返り 値 

DO.L =1 正常終了： 変更した 
=0 正常終了： 変更せ ず 

=-1 異常終了 

AO.L 印刷 職 レコードへの ハンドル 

ページ 印刷用の 印 届 IJ 環境 設定 ダイア ロ グを オープンし， マウスに よ る 操作に したがって 印刷 
g レコードの 内容を 変更し ます。 


• command=7 

未定 紅す 。 

• command=8 : PZ_OPENIMG 

ノ 、。ラ メータ 

pi 印刷 レコ— ドへの ハンドル 

返り 値 

DO.L 二 0 正常終了 

二- 1 異常終了 

AO.L グラ フ ポート への ボイ ンタ 
ページ 印刷用の^^ ラ フ ポート を 作成 します。 


• command=9 : PZ_RECORDPG 

ノ 、。ラ メータ 

pi レク タンク、、 ノレ レコードへの ポイ ンタ 

返り 値 

DO.L =0 正常終了 
二- 1 異常終了 

ペー ジ 印刷用の スクリプト の 記録を 開始 します。 

pi に 渡された レク タング、 ノレを， ビッ ト マップ レク タング ノレと する ビッ ト マップ レコー ドを 

作成し， グラフ ポート に セット します ($A1C8 GMCalcBitmap, $A1D1 GMCalcGraph 
を 使用)。 pi が 0 の 場合， 印刷 環境 レコード 中の prPageRect を ビットマップ レク タング 
ルと します 0 i^JLh の处; 理の 後， $A199 GMOpenScript を 呼びます 0 
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• command=10 : PZ—PRINTPG 

ノ 、。ラ メータ 

pi =〇 スクリプト 了 

丰〇 スクリプト 廃棄 

p 2 ユーザー プロセスへの ポイ ンタ 返り 値 

D0.L =0 正常終了 

=-1 異常終了 

スクリプトの Ei 录を 終了し， 印刷を 開始し ます。 

pi が 0 以外の 場合は， スクリプトを 廃棄し， 印刷は 行いません。 

が 0 の 場合， スクリプトから ビット イメージを 展開し ます。 0 以外の 場合， ユーザー プ 
ロ セスへの ボイ ンタ である と 解釈し， 印刷 範囲を 示す レク タング ルレ コードへの ポイ ンタと 印 
届_ レコー ドへの ハンドルを スタックに 積んで'， その アドレスを 呼び出します。 どちらの 場 
合 も， その後， プリンタへの 出力を 行います。 


• command=ll : PZ ACTION 


ハ ° ラ メータ 


返り 値 


pl 


D0.L 


サブ コマンド 

=0 印刷 終了 

=1 印刷 中 

=z 印刷 中断 

=3 タイムアウト 発生 

=-1 異常終了 

サブ コ マンドに よっ て 指* 定し た 印刷の 制御を 行います。 

• サブ コマン ド = 〇 : PC STAT 
印刷を 続行し ます。 

スクリプトを 展開， あるいは ユーザー プロセスを 呼び出しつつ， データを 出力し ます。 
• サブ コマン ド =| : PC END 
印刷を 終了し ます。 

• サブ コマン ド = 2 : PC — ST 0 P 
印刷を 中断し ます。 

• サブ コマン ド = 3 : PC C0NT 
印刷を 再開し ます。 
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• command=12 : PZ_CLOSEIMG 


ハ ° ラ メータ 

なし 

返り 値 

D0.L 

=0 

正常終了 


=-1 

異常終了 


ページ 印刷を 終了し ます。 

• command=13 : PZ—STRING 

ノ 、。ラ メータ 


Pi 

印刷 環境 レコ ー ドへの ハンドル 


文字列への ハン ドル 

P3 

文字列の バイト 数 

p4 

=0 

文字列 出力 後に 改 ページす る 


=1 

文字列 出力 後に 改 ページし ない 

D0.L 

=0 

正常終了 


=-1 

異常終了 


コード 印刷を 開始し ます。 

• command=14 : PZ_VERSION 

ノ 、。ラ メータ 

なし 

返り 値 

DO.L ノ ぐ ー ジョン （下位 ワ — ド） 

プリンタ ドライバ、 のバ 、ー ジョンを 返します 0 

• command=15 : PZ—MAXREGT 

ノ 、。ラ メータ 

pi 印刷 環境 レコ— ドへの ハンドル 

p£ 用紙の _ (176 ページ 參 照） 

p3 レク タンク、、 ノレ レコードへの ポイ ンタ 

返り 値 

DO.L =0 正常終了 
=-1 異常終了 

p2 で 指定 さ れた 用紙に 印刷 可能な 最大の 範囲を， P3 で 指定され た レ クタ ン グル レコード 


204 


プリン ト マネ ー ジヤ 


に 収めます。 


• command=16 : PZ_STATUS 


ノ 、。ラ メータ 



なし 



返り 値 



D 0.1 

=0 

出力 不可 


=1 

出力 可 


プリ ンタに 出力 可能 かどう かを 返します。 


まとめ 


プリンタは 日に日に 高性能， 低価格に なり， いまや 300 DPI の 解像度の プリンタを 非 
常に 安価に 手に入れる ことができる ようになりました。 プリント マネージャでは， こうした 高 
性能の プリンタを 生かして， 高品質の 出力を 行うた めの 工夫が なされて いる ことが おわかりい 
ただけ る と 思います。 

プリント マネージャ によって， SX - WINDOW 上の DTP 環境の 基盤が 準備 さ れた といえ 
るか も しれません。 
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1 つの アプリ ケー ショ ンが 複数の ウィ ン ドウを 開いて 使用す る ことは 以前に も あ りました 0 
しかし， ピン ボール. X のように， たかだか 2 つの ウィンドウ 程度なら ともかく， 複雑な ア 
プリ ケー ション になる と， より 多くの ウィンドウを 開かなければ ならない こと も 考えられ ま 
す。 従来の 形式の ウィンドウを 複数 並べた 場合， どの ウィンドウが 作業の 中心になる のか わ 
かりにく く なる 場合が あ ります。 

サブ ウィンドウ マネージャは， 「サブ ウィンドウ」 という 概念を 導入す る ことにより， こう 
した 混乱に 1 つの 解決策を 提示し ます。 

|l サブ ウィンドウの 意味 _ 

サブ ウィンドウが どのよ うな もの か 理解す るには， Easypaint を 使って みるの がいちばん 
の 早道でしょう。 Easypaint を 立ち上げ ると， 作画 ウィンドウと 呼ばれる 標準 ウィンドウの 
ほかに， ツール 類を 収めた いくつかの 見慣れない 形の ウィンドウが 現れます。 これらは， サブ 
ウィンドウ によって 実現され ています。 これらを に とって， サブ ウィンドウの 特徴を 述べる 
ことにします。 

これらの ウィンドウ （本来の ウィンドウと 区^す るた めに， 以降， サブ ウィンドウと 呼び ま 
す) は， 見かけ も， ドラッグ などの 操作 感覚 も， ほとんど ウィンドウと 同じです が， しばらく 使っ 
ている と， いく つか 違い 力 5 ' 見えて きます。 

まず 最初に 気がつく ことは， ウィンドウの 枠が 見慣れない 形を している ことです。 これは 標 
準 ウインドウ や プレーン ウインドウ など， ウインドウ 定義 関数に よって 用意され ている ウイン 
ドウの どれと も 異なって います。 SX 1.10 になって， このような 形式の ウィンドウが 追加 さ 
れ たわけで もありません。 つまり， ウィンドウ 定義 関数とは 関係の ない， 自由な 形の ウィンド 
ウ であると いえます （図 1)。 

サブ ウィ ン ドウは， 表示され ている と きには つねに 作画 ウィ ン ドウより も 手前に 表示され て 
います。 Easypaint では， 複数の サブ ウィン ドウが デスク ト ップ 上に 置かれる 場合が ありま 

■図 1 サブ ウイン ドウは 枠の 形が 自由 


遷 遍 差] 遲 u レ 
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すが， それらには アクティブ/イン アクティブの 区別が なく， その 前後 関係が 茨 化する こと も 
ありません （図 £)。 

■図 2 アクティブ/ イ ン アクティブの 概念がない 


左 クリック （ a ), ( b ) の プライオリ テイは 変化し ない 



さらに， 作画 ウインドウが イン アクティブ になった 場合， サブ ウインドウは デスクトップ か 
ら 一時的に 取り除かれ， ふたたび 作画 ウインドウが アクティブになる まで 表示され ません （図 
3)〇 


■図 3 ウインドウの アク テイべ 一 卜に よって 閉じる 



以 とは， いずれも サブ ウインドウの 特徴が よく 表れて いる 箇所です。 

サブ ウインドウの 目的は， おもな 易と なる ウインドウ （主 ウインドウ） とは 別の ウイン 
ドウを 用意し， その 中に アイコン や 各種 情報の 表示 領域を 用意す る ことによって， わかりやす 
い ユーザー インタフェースを 構築す る ことにあります。 ウインドウの 一種です から， ユーザが 
もっと も 操作/参照 しやすい 場所に ドラッグして おく こと も 可能で， その 自由度は かなり 高い 
ものと なります。 

先 ほど 挙げた 特徴は， サブ ウインドウが そういった 用途の ために 用意され たこと を 物語って 
います。 


(1) ウインドウの 枠の 形を 自由に 設定で きる 

標準 ウインドウを 利用して 複数の ウインドウを 操る 場合， デスク ト ップ 上に 標準 ウインドウ 
がいくつ も 存在す る ことにな り， どれが 主 ウインドウ であるの か 区別が つきに くく なります。 
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サブ ウィンドウなら ば， ウィンドウの 枠を 自由な 形に する ことができ るので， 主 ウィンドウと 
一目で 区別で き るよう な 形を 与え， 混乱^を 防ぐ こ とがで き ます* 1 。 

* 丨 ： 逆に 自由す ぎる ことから 混乱を 招く 可能性 もあります。 せめて 同じ アプリ ケー シ ョンで 扱う サフ 
ウィン ドウには 統一 性を 持たせた ほうがよ いでし ょう。 

(2) アクティブ/イン アクティブの 概念が' ない 

アイコンを 収めた ウィンドウ 内部， または 主 ウィンドウを クリックした とき， アク ティべ— 
卜が 発生して 前後 関係が 入れ替わったり すると， その 位置 関係に よっては 画面が 見づ らくな っ 
たり， す喿イ 乍が 火 買 雑に なったり する ことがあります* 2 。 サブ ウィンドウには アクティブ/イン ア 
ク ティブの 概念がない ので， つねに 主 ウィンドウ， そして もちろん， ほかの アプリ ケー ショ ン 
の ウィンドウより も 手前に 表示され ます。 

*2: わかりやすい 例と して， 主 ウィンドウが アクティブ になった 結果， ツール 類を 収めた ウィンドウ 
がその 後ろに 隠れて しまう ことが 挙げられます。 

(3) 主 ウィンドウの アク ティ ペート によって 閉じる 

いま ま で 述べて きたよう な 用途の ウィンドウは， 主 ウィンドウが アク ティ ブの 場合に は 必要 
です が， イン アクティブ になった 場合には 必要がない ばかり か， ほかの アプリケーションの 操 
作の 邪魔になります。 したがって， 主 ウィンドウが イン アクティブ になった 場合は 一時的に 閉 
じら れ たほう が 好都合な のです。 

このような 特徴から， 主 ウィンドウに 従属す るよう に 見える ウィンドウ， サブ （副） ウィン 
ドウと いう 名称に 辱して いただ' ける と 思います。 

[2 I サブ ウィンドウの 仕組み 

まず 最初に， サブ ウィンドウ に関する 情報を まとめた， サブ ウィンドウ レコードの 内容を 示 
して おく ことにします。 ウィンドウ 1 枚 1 枚に ついて， それぞれ ウィンドウ レコードが 存在 
していた ように， サブ ウィンドウを オープン する ことで、， それぞれに サブ ウィンドウ レコード 
が 用意され ます。 

サブ ウ インド ウレ コー ドの 内容は 以下のと おり です。 


208 


2 サブ ウインドウ マネージャ 


オフセット 

欄 名 

内 容 


+ $00 

pix 

グラフ ポー ト レコー ド 


+ $40.w 

wKind 

ウイン ドウの 種類 （$20 固定） 


+ $42.6 

wVisible 

描画 状態 


+ $43.b 

wHilite 

く 使用され ない〉 


+ $44.b 

wClose 

く 使用され ない〉 


+ $45.b 

wStatus 

く 使用され ない〉 


+ $46.w 

wOption 

く 使用され ない〉 


+ $48.1 

wOutSide 

アウ ト サイ ドリー ジョ ン への ハン ドル 


+ $4c.l 

wlnside 

イン サイ ドリー ジョンへの ハン ドル 

(デフ ォルト では wOutSide = wlnside) 

^ ウイン ドウ レコード 

+ $50.1 

wllpdate 

アップデート リー ジョ ン への ハン ドル 

と 同じ 形式 

+ $54.1 

wDef 

く 使用され ない〉 


+ $58.1 

wDefData 

く 使用され ない〉 


+ $5c.l 

wTitle 

く 使用され ない〉 


+ $60.w 

wTWidth 

く 使用され ない〉 


+ $62.1 

wControl 

コン ト ロー ルへの ハン ドル 


+ $66.1 

wNext 

次の サブ ウイン ドウへの ポインタ 


+ $6a.l 

wPicture 

ウインド ウス ク リブ トへの ハン ドル 


+ $6e.l 

wTask 

く 使用され ない〉 


+ $72.1 

tPrio 

プライ ォリ テイ 値 



一見して わかる ように， サブ ウインドウ レコードは ウインドウ レコードと ほとんど 同じ 形式 
です。 異なる 点は ウィンドウ 定義 関数に 関わる 部分で， これらの 部分は 使用され ていません。 
また， プライオリ ティ 値と いう 新い、 欄が 追加され ています。 

サブ ウィンドウは， デスク ト ップ上 にあって アプリ ケー シ ヨンが 自由に 使う こ とので き る領 
域と いう 意味で， ウィンドウの 一種で あると いえます。 実際， サブ ウインドウは， ほとんど ウイ 
ン ドウと 同 じ 仕組みの もと で 動作 してい ま すが， 先 ほ ど 挙げた 3 つの 特徴が 両者を 異なる も 
のと しています。 この 3 つの ネ寺徴 の 仕組みを 説明す る こ とで サブ ウインドウの メカニズムを 
明らかにする こ とに しまし ょう。 

(1) ウインドウの 枠の 形を 自由に 設定で きる 
= ウィン ドウ 定義 関数を 利用し ない 

ウィンドウでは， ウインドウ ID をす 旨定 する ことによって， イ可 種類 か 用意され ている ウイ 
ン ドウのう ち， 目的に 応じた ものを 開きます。 しかし， サブ ウインドウには ウインドウの _ 
という ものが#* しません* 3 。 

*3: サブ ウイ ンド ウレ コー ドの 中の ウイ ンド ウレ コー ドに 相当す る 部分に 「ウイン ドウの 種類 j が 記 
録 されて いますが， ここには $20 が 収められ， サブ ウインドウ である ことを 示します。 この 値は 
固定で， 変化す る ことはありません。 

ウィンドウを 開く と， ウインドウの 種類に 応じて 四角形の ウインドウの 枠が デスクトップ 上- 
に 描かれ， その内 部の ウインドウ コンテンツが アプリ ケー シ ヨンの ための 領域と して 提供され 
ました。 しかし， サブ ウィンドウでは ウインドウの 枠は 描画され ません。 さらに， サブ ウイン 
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ドウの 内部が ヽ身 景色で 塗り潰される こと もありません。 

これら はすべ て， ウィンドウ 定義 関数と サブ ウ ィン ドウ の 間に なんの 関係 も 存在し ない こと 
を 意味して います。 したがって， サブ ウィンドウの 枠の 描画 や， サブ ウィンドウの ドラッグな 
どの 理 は， アプリケーションが 自分で 行わなければ なりません。 サブ ウィンドウ に関する 情 
報は サブ ウインドウ レコードに 含まれます 0 この レコードは ウインドウ レコードと ほぼ 同じ 形 
式で あるた め， やはり 先 S 頁 $40 バイトに グラフ ポートを 含みます。 したがって， サブ ウィン 
ドウ 内部には グラフ イ ック マネージャを 利用して 自由に 描画す る ことが 可能です。 サブ ウィン 
ドウの 枠の 描画な どは， グラフ ィ ック マネージャを 利用して 描画す る ことになります （図 4)。 

■図 4 サブ ウィンドウの 枠は アプリケーションが 描画す る 


驅醒誦 


EiiBiaggiii 


これらは すべて Easypaint 自身が 描画して いる （ Easypaint より） 


(2) アクティブ/イン アクティブの 概念がない 

= サブ ウインドウ リスト， プライオリティの 導入 

ウイン ドウの アクティブ/ イ ン アクティブの 概念は， ウイン ドウ マネージャの ウィンドウ！； 
ス トに 強く 依存して います 0 ウインドウ リス トは デスク ト ップ 上に 存在す る ウイ ン ドウの 前後 
関係を 示す データ 構造で， アク ティ ペートとは， すなわち， この リストに 変イ 匕が 起こった こと 
を 意味し ます。 個々 の ウインドウから 見れば， アク テイべ 一 卜の 際， 自分が ウインドウ リスト 
の 一方の 端， つまり 画面の もっとも 手前に 来れば アクティブ という ことになります。 逆に， 画 
面の もっとも 手前で なくな ればイ ンアク テイ ブ です。 

サブ ウィン ドウは， ウィン ドウ マネージャの ウイ ン ドウ リスト とは まったく 別な デ、ー タ 構造， 
サブ ウィンドウ リ ストに よって 連結され ています。 構造 的には ウインドウ マネージャと 同様で， 
211 ページの 図 5 のよ うに 表現す る こ とがで きます。 

ウインドウ リストが ウインドウ の 前後 関係を 意味 していた ように， サブ ウ イン ドウ リスト も 
サブ ウインドウ どうしの 前後 関係を 意味して います。 図 5 の 表現では， 下の ほうに 位置す る 
サブ ウインドウが もっとも 手前に 表示され る ことになります。 ウインドウ リストは， ウィンド 
ウ がいくつ も 開かれて， その 前後 関係が 変化す る 中で 形作られます が， サブ ウィンドウ リスト 
では， あらかじめ， ある®* その 要素 （サブ ウインドウ） の 順番 力 ? 決まって おり， その 前後が 
入れ替わ ると いう ことはありません。 そ の 順番， すなわち 前後 関係を 決める のが プラ イ オリ ティ 
です 0 
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■図 5 サブ ウインドウ リストの 概念 

サブ ウイン ドウ レコード 


次の サブ ウイ ンド ウレ コー ドへの ポインタ 


新しく サブ ウィンドウを 開く ときには， 同時に その サブ ウィンドウの プライオリティを ネ旨定 
します。 プライオリ ティは， 0~$ FFFFFFFF の 符号な しの ロング ワード 値で， 小さい ほ 
ど 手前に 表示され る ことになります。 新しく 開かれた サブ ウイン ドウの サブ ウイン ドウ レコ ー 
ドは， プライオリ テイに したがって サブ ウインドウ リ ストの しかるべき 位置に 挿入され ます (図 
6)〇 


■図 6 サブ ウ イン ドウ リスト への 登録 

プライオリティ 


512 


画面 奥 


画面 手前 


プライオリ ティ 255 の 
サブ ウィン ドウ 追加 


256 



240 


このと き， もしも プライオリ テイが 同 じ 値の サブ ウ イン ドウ がすで に 登録され てい た 場合で 
も， 問題な く 登録され ますが， 後から 登録した サブ ウインドウの ほうが 手前に 表示され る こと 
にな ります。 

プライオリ テイに よっ て 決めら れた サブ ウイン ドウの 前後 関係は， サブ ウ イン ドウ リストに 
連なって いるかぎ り 変化す る こ とは あり ません* 4 。 

*4: サブ ウィンドウの 前後 関係を 変化 させたい 場合は， 一度 サブ ウィンドウ リス トから 外して， サブ 
ウィンド ウレ コー ド 中の プライオリティ 値を 変化 させた 後， ふたたび サブ ウ イン ドウ リス トに 登 
録 すると いった 処理を 行います。 
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(3) 主 ウィンドウの アク ティ ペート によって 閉じる 
= ウィン ドウ マネージャとの 連係 

主ゥィ ン ドゥが イ ン アクティブ になった 場合に， それに 従属す る サブ ウィ ン ドウが 閉じる 仕 
組みに ついて 解説し ます。 

先 ほど ウィンドウ リスト と サブ ウ ィン ドウ リストは まったく 別で あ ると 述べ ま したが， いっ 
さい 関係がない わけで もありません。 サブ ウィンドウ リストは， ウィンドウ リストの 「手前」 
側の 端に 接ぎ木され ている と 考えても よいで しよう。 このため， つねに サブ ウィンドウは アク 
ティブな ウィンドウより も 手前に 表示され ます。 

アク ティべ ートが 発生し， アクティブだった ウィンドウが イン アクティブに 変化す ると， サ 
ブ ウィンドウは サブ ウィンドウ リストから 自動的に 外されます* 5 。 このと き， 例外が あって， 
プライオリティが 未満の サブ ウ ィン ドウは リストに 残ります* 6 (図 7)。 サブ ウ ィン ドウ 
リストから 外された サブ ウィンドウは， デスクトップから 除かれ， ユーザの 目からは 消えて し 
まった ように 見えます。 もちろん， このと き プライオリ ティが 32 菊 _ の サブ ウィンドウは 消 
えずに 残って います。 

*5: すべての サブ ウィン ドウを 消した く ない が， ウィン ドウの アク ティべ _ 卜 を 行いたい ときの ため 
に， ウィン ドウ マネージャに $AIFF WMSelect 2 という SX コールが 増設され ています。 

*6: プライオリティ 〇〜丨 5 は システム 予約です。 したがって， 消えない サブ ウィンドウを アプリ ケー 
シヨン が 使用したい 場合は ブライ オリ ティ 丨 6 〜 31 を 使用す る ことになります。 

■図 7 アク テイべ ート によ る サブ ウイン 


画面 手前 


> サブ ウイン 


ゥィン ドゥ A 

ウインドウ B ウィンドウ 


プライオリティ 3 2 以上の 
サブ ウィン ドウは サブ ウィ 
ン ドウ リス トから 外れる 



ドウ リストの 変化 


ドウ 


31 


ウイン ドウ B がアク テイべ 一 卜 
され， ウイン ドウ B が イン アク 
テ イブに 


ウインドウ B 


ウインドウ A 
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消える 場合は 自動です から 問題は ありま せんが， 主 ウィンドウが ア ク ティ ブ にな った ときに 
サブ ウィンドウを 再 表示 させたい 場合は， アプリケーションが 判断し， 再 表示したい サブ ウィ 
ン ドウを サブ ウ ィン ドウ リスト に 登録す る 处理を 行う 必要が あります。 

このよう な 仕組みに よって， 複数の アプリ ケー ショ ンが サブ ウ ィン ドウ を 利用す る 場合で も 
問題が 発生し ない ことを? i 窗認 して おきます。 

すでに 2 つの サブ ウィンドウ （プラ オリ ティ £55 と £56) を 開いて いる アクティブな ア 
プリ ケー ショ ン A が 動作して いる 状態で， あらたに 1 つの サブ ウィンドウ （プライオリ テイ 
512) を 持つ アプリケーション B を 起動し， その後， アプリケーション A がアク ティべ ート 
された 場合を 例に とって 考えて みまし よう。 


(a) 初期 状態 

デスク ト ップ には アプリ ケーシ ョン A の 主 ウイン ドウ， ウインドウ A と サブ ウ イン ドウ 
255 と 256 が 存在して います （214 ページの 図 8 (a) 参照)。 

(b) アプリケーション B が 起動され ウインドウ B が 開かれる 

これに よって， ウィンドウ A は イン アクティブ となり， ウインドウ A を 主 ウインドウ とす 
る サブ ウィンドウ 255 と 256 は サブ ウインドウ リストから 取り除かれます。 この結果 デ 
スク トップには イン アクティブな ウインドウ A と， アクティブな ウインドウ B だけが 残り ま 
す （図 8 (b)) 0 

(c) アプリケーション B が サブ ウインドウ 512 を 開く 

サブ ウィンドウ 512 は， サブ ウィンドウ リストに 登録され， デスクトップ 上に 表れ ま 
す （図 8 (〇))〇 

(d) アプリケーション A がアク テイべ ート される 

ウィンドウ B は イン アクティブ となり， サブ ウインドウ 512 は サブ ウインドウ リスト か 
ら 外れ， デスクトップから 消えます 0 

アク ティべ ー トイ ベントが アプリ ケーシ ョン A に 通知され， ウインドウ A が アクティブに 
なった ことを 知る と， アプリケーション A は サブ ウインドウ 255 と 256 を サブ ウインドウ 
リストに 登録す る 处:理 を 行います。 この結果 デスクトップには アクティブな ウインドウ 厶 
それに 従属す る サブ ウィンドウ 255， £56, そして イン アクティブな ウインドウ B が 表示 さ 
れ ている ことになります （£14 ページ 図 8 (d)) 0 
さらに ウィンドウ B が アクティブ になった 場合， どのような 処理が 行われ デスクトップ 
が どのような になる のか， 説明す るまで もない t 思います。 

このように， うまく サブ ウインドウの 出し入れを 行うた めには， アプリケーションが 次の Z 
つの 点を 守って いる こ とが 条 f 牛と なり ます。 
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■図 8 複数の アプリケーションと サブ ウインドウ 

( a ) 初期 状態 


—— 255 

A — 

256 


画 面 

( b ) アプリケーション B が 起動され， ウインドウ B が 開かれる 


255 

! 

256 



ウインドウ 

A 


，サブ ウ- 


ド ウ 


ウィンドウ/サブ ウインドウ リス 



(C) アプリケーション B が サブ ウインドウ 512 を 開く 



512 




B 


A 





( d ) アプリケーション A がアク テイべ 一 卜される 




255 

3 


A 


E 



256 
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2 サブ ウインドウ マネージャ 


(1 ) 主 ウィンドウと なるべき ウィン ドウが アクティブな 状態で サブ ウィン ドウを 開く 

サブ ウィン ドウ や主ウ ィン ドウに そ の 主従 関係が 录さ れ ている わ けでは なく， サブ ウィン 
ドウ マネー ジャと ウィンドウ マネージャの 連係、 がその ような 関係を つく り 出して いる ことは す 
でに おわかり いただけ たと 思います。 連係の 内容を 考えれば， この 条件の 意味 も おのずから 明 
ら かでしょう。 


(2) ァク ティべ 一 ト イベントで 適切な 处理を 行う 

主 ウィンドウが ア タテ ィブに なっ た 場合， そ れに 従属す る サブ ウ ィン ドウ を サブ ウ ィン ドウ 
リ ストに 登録す る 处理 を 行います。 主 ウィンドウが イン アクティブ になった ときに サブ ウィン 
ドウ リス トから 外す 処理は， サブ ウイン ドウ マネージャが 自動的に 行います。 


サブ ウインドウの 利用 


プログラミング 的には， サブ ウインドウは ウインドウと ほぼ 同様に 扱う こと 力 ? できます。 た 
だし いくつか 注意が 必要な 箇所が あります ので， ここで 解説して おきます。 


ほかの マネージャとの 相性 


何度も 述べて きたよう に， サブ ウィンドウと ウインドウは 非常に 似た 存在です。 サブ ウィン 
ドウ レコードと ウインドウ レコードに はかなり の 互換 1 生が ありま す 力 ? ，そ の 相違の た めに ウイ 
ンド ウレ コードを 引数と してす 旨定 する マネージャとの 相性は， 次のように なって います。 

〇 グラフィック マネージャ 

サブ ウ インド ウレ コー ドの 先頭の グラ フ ポート レコードを 通して， サブ ウインドウ 内の ビッ 
ト マップに 描画す る こ とがで きます。 すべての SX コール カ ? 使用可能です。 

△ウイン ドウ マネージ ャ 

ウィンドウ 定義 関数を 利用で きない こ とから， ウィンドウ マネージャの SX コールの 大部 
分は 利用 不可です。 

例外的に， $ A 20 D WMUpdate , $ A 20 E WMUpdtOver などの アップ デート リージ ョ 
ン 関係， ウィ ン ドウ 定義 関数と 無関係な， ユー ティリ ティ 的な SX コール （$ A 2£5 
WMDragRgn など） は 利用 可能です。 

〇 コント ロ ー ル マネージャ 

すべての SX コー ルカ 5 '使用可能です 0 

〇 テキス ト マネージャ 

すべての SX コー ルが 使用可能です 0 
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△タスク マネージ ャ 

タスク マネージャの ュー ティリ ティの 中に， ウィ ン ドウ レコー ドを 引数と する ものが ありま 
す。 おもな ものに ついて 使用の 可否を 示します。 


X$A3A£ SXCallWindM 
0$A3A3 SXCallCtrIM 
x $A3AA SXInvalScBar 
x $A3AB SXValidScBar 
X$A41F SXCallWindM£ 


サブ ウインドウの 利用 


サブ ウ ィン ドウは ウィンドウと 同じよう に 利用で きます。 

•サブ ウィン ドウの オープン 

サブ ウィンドウを オープン する 際には， すでに 主 ウィンドウが オープンされ， アクティブに 
なって いる 必要が あります* 7 。 

*7: プライオリティ 〇〜 31 の 消えない サブ ウィン ドウを 使う 場合， 主 ウイン ドウに 従属す る ものと し 
ての 使い方 以外 も 考えられます。 


サブ ウイン ドウの 才 

ープン には， 

ウィン ドウの オープンに $A1F9 WMOpen を 使うよう 

二， $A££7 WSOpen を 使います。 

WSOpen の 弓 丨 数は 次の とおり です。 

long 

sWinPtr 

* サブ ウィ ンド ウレ コードの アドレス 

long 

rgnHdl 

* サブ ウィン ドウの 内部と なる リージ ヨ ンへ 



の ハン ドル 

long 

priority 

* プラィオリ ティ 値 


sWinPtr は， $A1P9 WMOpen と 同様に， 0 を 指定す ると ヒープ 領域に， アドレスを 
す旨定 すると， その ア ドレスから サブ ウイ ン ドウ レコードを {乍 成します 0 

ウィンドウの 外形は， レク タング ル レコー ドでは なく， リージョンで、 指* 定 します 0 という こ 
とは， リージョンで 表 王 見で きる 領域で あれば， どんな 形で も サブ ウインドウの 形に する ことが 
可能と なって います 0 グロー ノ ぐ ル 座標系です 0 

プライオリティ 値は O—SFFFFFFFF です が， 〇〜 16 は システム 予約です。 

実際に コードを 書く と， 次のようになります。 ここでは ごく オーソドックスに， 四角形の サ 
ブ ウイ ン ドウを 作成して みま しよう。 

まず， リージョンを 作成し ます。 
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SXCALL 

$A15A 

ホ GMNewRgn 

pea 

rectPtr(pc) 

* サブ ウィン ドウの 内部を 示す レク 
タング ルレ コー ドへの ポインタ 

pea 

(aO) 

* 新し く 作成した リージ ョ ン への ハ 
ン ドル 

SXCALL 

$A15P 

*__GMRectRgn 

addq.l 

#8，sp 


move.l 

aO,rgnHdl(a5) 

* リージ ョ ン への ハン ドルを 保存 

作成した， 四角形の 領域を 表現す る リージ ョ 

ンを 使って， サブ ウインドウを オープン します。 

プライオリ テイは £55 と 

to 

し， サブ、 ウインドウ 

レコードは ヒープ ゾーンに 作成す る こ とに しま 

move.l 

#255,-(sp) 

* プライオリティ 値 

move.l 

rgnHdl(a5),-(sp) 

* 内部を 意味す る リージ ョ ン への ハ 
ン ドル 

clr.l 

-(sp) 

* ヒープ ゾーンに 作成 

SXCALL 

$A227 

*__WSOpen 

lea 

12(sp),sp 



この結果， 正常に オープン できた 場合は A 0 に サブ ウイ ンド ウレ コードへの ポイ ンタが 返つ 
てく るので， ワークに 保: 存 して おきます。 

move.l aO,sWinPtr(a5) 


•サブ ウィン ドウ 内部の 描画 

サブ ウィ ン ドウ 内部へ 相 SB する ための グラフ ポートは， サブ ウィ ンド ウレ コードの 先頭に 埋 
め 込まれて います 0 したがって， サブ ウイン ドウ レコードの 先頭 ア ドレスを グラフ ポー トレ コー 
ドの アドレスと して セッ ト する こ とに より， 以降， 内部への 描画を 自由に 行う こ とがで きます。 

move.l sWinPtr(a5) ， -(sp) 

SXCALL $A131 *__GMSetGraph 

addq.l # 4,sp 


ここ で 忘れて はならない のが， サブ ウインドウ の 枠な どは いっさし 、描画 されて いない ことで 
す。 必要が あれば， 自分で サブ ウィンドウの 枠 や 付属物を 描画し， 内部を 背景 色で 塗り潰さな 
ければ なり ません。 
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•アッ プ デート イ ベント への 対応 

サブ ウィン ドウ 内部に アップデート カ 5 ' 必要に なった 場合は， ウィン ドウ 同様に アップデート 
イベント カ 5 '発生し ます。 アップデートの 方法は ウィンドウと 同様です が， サブ ウィンドウの 枠 
など も 自分で 書き 直す 必要が あ る こと に 注意して ください。 

サブ ウィンドウの 枠 や 内部の 描画が， DrawSub という サブルーチンで 一括して 行われて 
いる 場合， アップデート 処理は 次のように 書く ことができます。 


move.l 

sWinPtr(a5),-(sp) 

SXCALL 

$A20D 

addq.l 

#4,sp 

bsr 

DrawSub 

move.l 

sWinPtr(a5)-(sp) 

SXCALL 

$A20E 

addq.l 

#4,sp 


* アッ プ デート 開始 
氺 WMUpdate 

* 枠 & 内部を 書き 直す サブルーチン 

* アッ プ デー ト 終了 
*__WMUpdtOver 


•アク ティべ ー トイ ベン トへの 対応 

プライオリ ティ 値 32 以上の 「消え る」 サブ ウ ィン ドウは， 主 ウィンドウが アクティブ になっ 
た 際には， サブ ウ ィン ドウ リスト への 再 登録が 必要です。 サブ ウ ィン ドウ を サブ ウ ィンド ウリ 
スト に 登録す るには $A22A WSEnlist を 使用 します。 この コールで 登録で き るのは， サブ 
ウィンドウ リストから 外れて いる サブ ウ ィン ドウ だけな ので 注意 して 〈ださい。 

本書で 示す スケルトンの アク テイべー トイ ベン ト 理 ルーチンでは， 主 ウイ ン ドウの アク 
ティ ブフラ グが 真のと き に主ウ ィン ドウ がア ク ティ ブ になっ た 場合* 8 に 不^合が 生じる ので， 
次の よう に 書き換えて しま え ば' よ いでし よう。 

*8: ウィンドウを もっと も 手前に オープン すると， その 直後に アク ティべ ー トイ ベン トが 発生し ます。 
スケル ト ン では アクティブ フラグを 真で 初期化して いるので， こう いう ケースが 発生して しまう 
ことにな り ます。 

ACTIVATE : 

move.l 
beq 
lea 
cmp.l 
bne 
tst.b 
bne 

st 


eventRec whoml(a5)，dO 
ACT9 

winPtr(a5),aO 

aO,dO 

ACTO 

winActive(a5) 

ACT9 


* [アク テイべ 一 ト イベント] 


* 自分の ウィン ドウが 
* アクティブに なった？ 

* 違う のなら ACT 0 へ 
* すでに アクティブ？ 

* ならば ACT 9 へ 


wmActive(a5) 


* アクティブ フラグを セット 
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move.l 

sWinPtr(a5),-(sp) 

* サブ ウィン ドウを 再 登録 


SXCALL 


*__WSEnlist 


addq.l 

#4,sp 



bra 

ACT9 


ACTO: 

sf 

winActive(a5) 

* アクティブ フラグを リセ ツ 

ACT9: 

moveq 

rts 

#0,d0 



•レフ ト ダウン イベントへの 対応 

サブ ウィンドウの ウィンドウと しての 特注を 生かす ためには， ドラッグ' したりで きなければ 
いけません。 しかし， ウィンドウ マネージャが 利用で きない 以上， $ A 205 WMDrag など 
を 利用す る ことは できません。 したがって， そういった 处理 はすべ て 自分で 行わなければ なり 
ません。 

ここ では コード は 示し ま せんが， 本章 末の サンプル プロ グラ ムで ドラ ッ グの 处理を 行って い 
ますので， 参考に してみ てくだ さい。 

サブ ウィン ドウの 内部に コント ロー ルを 置いたり した 場合は， ウィン ドウ 同様 $ A 3 A 3 
SXCallCtrlM が 羽 用で きる ので， 处理は 非常に 簡潔に 言 强 できます。 

•サブ ウィン ドウの クローズ 

サブ ウ ィン ドウを クローズ する 場合， サブ ウ イン ドウ は 必ず サブ ウ ィン ドウ リストに 登録 さ 
れ てなければ いけない ことに 注意して ください。 また， オープン 時に サブ ウィンドウ レコード 
を ヒープ 上に 作成した 力％ 指定した 場所に 作成した かに よって， 使用す る SX コールが 異な 
ります。 ヒープ 上に 作成して いた 場合は $ A 229 WSDisposa それ 以外の 場合は $ A £28 
WSClose です。 

例の 場合は， ヒープ 上に 作成して いました から， 前者を 使います。 
move.l sWinPtr(a5),-(sp) 

SXCALL $AS£9 本 WSDispose 

addq.l # 4,sp 

サブ ウィンドウの 内部を 示して いた リージョンは， サブ ウィンドウを オープンした 時点で 別 
な リージョンに コピー されて 不要に なって いるので す 力す， まだ 廃棄して いなかった 場合は， こ 
こで 廃棄して おいてく ださい。 
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move.l rgnHdl(a5)，-(sp) 

SXCALL $A15B * __ GMDisposeRgn 

addq.l # 4,sp 


[4 ] まとめ 

サブ ウィンドウは， 自由度が 高く， それだけに 危険!' 生を はらんだ 存在で もあります。 しかし， 
ユーザー インタフェースを 向上させる という 目的を 見失わず， 常識的な 範囲 内で， その 自由度 
を 生かす こ とを 心がける 必要が あるで しよう。 
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3 3 | サン ブル プロ グラ厶 


プリン ト マネージャと サブ ウインドウ マネージャの 利用 例と して， サンプル プログラム 
P 闩 NSMPL と SWINSMPL を 示します。 


__ プリン ト マネージャの サンプル プログラム 

プリ ント マネージャの サンプル プログラム PRNSMPL は， プロセス 印刷を 利用して 特定 
の ウインド ウの 内容を ハード コ ピーす る プロ グラ ム です。 


(1) プログラムの 仕様 

[0 PT .1] と [0 PT .2] を 同時に 押す と， その 時点で アクティブな ウインドウの 内容を ハー 
ド コピーし ます。 [ CTRL ] と [ SHIFT ]， そして [0 PT .1] と [ OPT . 幻 を 同時に 押す こ 
とで， プ ログ' ラムは 終了し ます。 

印刷 環境は デフ オルトの もの を 使用 します ので， あらかじめ コント ロ ールノ 、。ネル 等で 設定し 
ておいて ください。 また， カラー の プリンタ を 使用し た 場合で も， 印刷は モ ノ クロで 行われます。 
図 1 は， 背景 設定 . X を アクティブ にし た 状態で PRNSMPL を 利用し た 例です。 


■ 図 1 PRNSMPL の 実行 例 


國鱷! H 廳鼹 鼴麵驪 



D . 麵 


設定 I 圖 取消 


(2) プログラムの 説明 

この プログラムでは， ハードコピー という， 複雑 かつ 一定で ない 画像の 印刷を 行う わけです 
が， このような 処理には 自由度の もっと も 高い プロセス 印刷が 適して います。 

プロセス 印刷の 处理の 要は， プリ ンタ ドライバに 登録して 使用す る ユーザ ー プロセス にあり 
ます。 プロセス 印刷を 行う 手順 自体は， 印刷 内容に よらず ほぼ 一定で， PRNSMPL でも 常 
識 的な 処理を 行って います （ PRNSMPL.S : 45 〜 4 ft 88-101, 125 〜 135， M 4 行)。 
PRNSMPL . S の £02 〜 319 行が， 問題の ユーザー プロ セ ス です 0 
PRNSMPL の ユーザー プロセス カ 5 ' 行って いる 仕事を 箇条書き にして みると， 以下の よう 
になり ます。 
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鲁 印刷すべき 範囲の 算出 

ユーザー プロセスが 砰 ばれた 時点では， カレント ビットマップ として， プリント マネージ ャ 
が 用意した ビットマップが セットされ ています。 すでに 説明した ように， いわば， この ビット 
マップは プリンタ の 紙面 その も ので あり， ここに 描画した ビット パターンが そのまま プリンタ 
用紙に 印刷され ます 0 この ビットマップの ビットマップ レク タング ルを 調べて， 現在 印刷す る 
ことが 要求され ている のは プリンタ 用紙の どの あたりで あるか， また/ その 場所には どのよう 
な 画像を 印刷すべき かを 判断 します。 

PRNSMPL では， あらかじめ アイ ドル イベントの 処理 中で 作成して おいた アクティブな 
ウインドウ 内部を コピーした ピッツの 内容を 印刷し ます。 プリ ント マネージャから 渡された 
ビッ ト マップの ビッ ト マップ レク タング ノレから， この ビッツ のどの あたりを 印刷すべき かを 判 
断して います （ PRNSMPL.S : £05 - £46 行な ど)。 

•ク リッ ピンク' '切: 理 

プロセス 印刷では， クリ ッ ピンク' 处理 はすべ て ユーザー プロセスが 行わなければ なり ません。 
描画を 制限す る 領域と しては 2 つの 矩形 型の 領 ビッ ト マップ レク タング ルと 印刷 範囲が 
あり， その 関 j 系は 図 2 のように なって います。 

印 届 丨跪 囲は， 印 届 丨] 環境 設定 ウインドウ によって 設定され るレク タング ルです。 ビットマップ 
レク タング ルは， 一般に その 範囲よりも 大きい か, 等しく なって います。 結局， ユーザー プロ セ 
ス 内で 描画で きる のは， ビットマップ レク タング ノレ 内部で， 力つ 印刷 章 5 H 内部に かぎられます。 
EP 届 I 揮 5 囲の 外に も 描画は 可能で， そ の 場合は そのまま 印刷 さ れて しまう ので 注意して ください。 

■図 2 クリッピングすべき 領域 


ビツ ト マップ レク タング ル 



斜線の 部分が 
描画 可能な 範囲 


PRNSMPL では， こ の 処理を 306 〜 307 行で （若干 簡略 化 してい ますが） 行って いま 
す。 これに 加えて， もともとの イメージの 右端の 半端な ドット （8 ドットに 足りない 端数） を 
マスクす る 处理を 行って いるた め （ PRNSMPL.S : 278 〜 282 行)， 若 11 な 印象を 与え 
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ている かも しれません。 


14： 階 調— タイ リング 54 理 

4 階 調で 表示され ている ものを モノクロで 表現す る 場合は， タイ リング、 等を 行 1 って疑 f 以階調 


で 表現す る しか あり ません。 PRNSMPL でも， かんたんな タ イリ ング 姓理を 行って 濃淡を 

表現して います （ PRNSMPL.S :£84 〜 300 行)。 


•プリン ト マネージャの ビッ ト マップへの データ 書き込み 

以± のように して 生成した 印刷 イ メージ は， カレント ビッ ト マップに 格納し ます (302 〜 303 
行)。 プリント マネ ー ジャ は， ユーザー プロセスから 戾っ てきた 時点で， ビットマップに 入っ 
ていた イメージを プリンタ ドライバ、 に 渡し， プリンタ ドライバ、 は それを 各 プリ ンタで 印字で き 

る 形式に 変換して 出力す る ことになります。 


(3) プログラム リス ト 



リスト 1 に WORKINC ， リスト 2 に PRNSMPL . S を 示します。 また， リスト 3 に 

実行 フ アイ ルを 作成す るた めの makefile を 示します。 

スケルトンは， 標準の ものを その ま 

ま 使用して ください。 



■リスト 1 PRNSMP し 用 WORK.INC 


1 * 

It 

3 * 

A x 

SX-WINDOW 

PRNSMPL 


4 + 

5 * 

6 本 

ワーク 定義 用イ ン クルー ド ファイル 

7 

8 STKSIZE 

= 2*1024 

* スタ ック サイズ 

y 

10 * 

1 1 

ワークの 内容の 定義 


11 

12 

. offset 0 


1 3 cmdLine: 


* コマンド ライ ンのア ドレス 

14 

ds . 1 1 

* を 保存す る ワーク 

)5 envPtr : 

16 

ds . 1 1 

* 環境の ァ ドレスを 
* 保存す る ワーク 

17 winRect : 


本 ウィンドウ 
ネ レク タンク ル レコ ー ド 

18 

ds. 1 2 


1 9 paramFIg: 


* コマンド ライ ンの 

* 解析 結果を 示す 

20 

ds . w 1 

* フラグ 

21 eventRec : 


* イ ベン ト レコ ー ドの 先頭 

22 eventRec what : 

23 

ds . w 1 

* イベント コ ー ド 

24 eventRec whoml : 


* 第 1 引数 

25 

ds . 1 1 


26 eventRec when : 

27 

ds . 1 1 

* イ ベン ト 発生 時 

28 eventRec 一 whoin2 : 


* 第 2 引数 
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29 


ds. 

1 

30 

eventRec_what2 : 



31 


ds. 

w 

32 

eventRec_task 1 D 



33 


ds. 

w 

34 

eventMask : 



35 


ds. 

w 

36 

task 1 D: 



37 


ds. 

1 

38 




39 

prnF lag: 



40 


ds. 

w 

41 

prEvHd 1 : 



42 


ds. 

1 

43 

b i tsRect : 



44 


ds. 

1 

45 




46 




47 

WORKS IZE: 



48 





* タスク マネージャ イベント 
* の 種類 

* 送り手の タスク I D 
* イ ベン ト マスクを 
* 保存す る ワーク 

* タスク 丨 D を 
* 保存す る ワーク 


* 印刷 中 フラグ 
* 印刷 環境 レコー ドへの 

* ハン ドル 

* ピッツの レク タング ル 


* ワークの 終了 


■リスト 2 PRNSMPL.S 


8 

9 

0 

1 

2 

3 

4 

5 

6 

7 

8 

19 

20 

21 MS L DOWN 

22 MSLUP: 

23 MSRDOWN 

24 MSRUP: 

25 KEYDOWN 
KEYUP: 
UPDATE: 
ACTIVATE 
SYSTEM3: 
SYSTEM4: 


SX-WINDOW 

PRNSMPL 

初期化 & 終了 & イ ベン ト 処理 モジ ル 


. incl ude 
. incl ude 

. xdef 
. xdef 
. xdef 
. xdef 
. xdef 
. xdef 

. incl ude 


text 


DOSCALL. MAC 
SXCALL.MAC 

INIT, _TINI 

Idle 

MS L DOWN, MSLUP, MSRDOWN, MSRUP 
KEYDOWN, KEYUP 
UPDATE, ACTIVATE 

SYSTEM!, SYSTEM2, SYSTEM3, SYSTEM4 


WORK. INC 


32 

33 


moveq HO, dO 
rts 


t ワーク エリアの 
内容を 定義す る ファイル 


レフ ト ダウン イ ベン f 
レフ ト アップ イ ベン f 
ライ ト ダウン イ ベン f 
ライ ト アップ イ ベン f 
キー ダウン イベント】 
キーア ップ イベント ] 

* アップ デ ー ト イベント ] 

* アク ティべ 一 ト イベント 
システム イベント 3 ] 
システム イベント 4 1 

以上の イ ベン トでは 
なにも しない 
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34 IDLE: 


35 

tst. b 

36 

bne 

37 


38 

move. 1 

39 

and. b 

40 

cmp. b 

41 

beq 

42 

cmp. b 

43 

bne 

44 


45 

move, w 

46 

SXCALL 

47 

addq. 1 

48 

bmi 

49 


50 

SXCALL 

51 

move. 1 

52 

move. 1 

53 


54 

tst. w 

55 

bne 

56 

move. 1 

57 

move. 1 

58 

sub. w 

59 

swap 

60 

swap 

61 

sub. w 

62 

swap 

63 

c 1 r. 1 

64 

move. 1 

65 


66 

move, w 

67 

pea 

68 

c 1 r. w 

69 

SXCALL 

70 

addq. 1 

71 

bmi 

72 

move. 1 

73 


74 


75 

pea 

76 

SXCALL 

77 

addq. 1 

78 


79 

cl r. 1 

80 

c 1 r. w 

81 

pea 

82 

pea 

83 

move. 1 

84 

pea 

85 

SXCALL 

86 

lea 

87 


88 

move. 1 

89 

SXCALL 


prnF I ag (a5) 

Printing 

eventRec 一 what2 (a5) , dO 

#$0f, dO 

«$0f, dO 
Kil IMe 
H$0c, dO 
IDLE9 

#-1, - (sp) 

$A4E2 
#2, sp 

Dr i verBusy 


$A20F 
3〇, a2 

(a2),al 

(al) 

Pr i ntEnd 
4(a2), dO 

8(a2), dl 
dO, dl 
dO 
dl 

dO, dl 
dl 

b i tsRect (a5) 
dl, b i tsRect+4 (a5) 

■ 011 ， _(sp) 
bitsRect (a5) 

- (sp) 

)A1CA 
h, sp 
Pr i ntEnd 
a0, bitsHdl 


(aO) 

$A1CC 

sp 

- (sp) 

- (sp) 

b i tsRect (a5) 
4(a2) 

(aO), - (sp) 
(al) 

$A17F 
22 (sp), sp 

il$8e, - (sp) 
SA021 


* [ アイ ドル イベント】 

* 印刷 中？ 

* ならば Printing へ 

* シフ ト キー ビットを 
* 取り出す 

* OPT1 OPT2 CTRL SHIFT 
本 を 取り出す 

* 全部 押されて いる？ 

* ならば Kil IMe へ 

* OPTUOPT2 が 押されて いる？ 

* でなければ IDLE9 へ 
* 印刷 開始！ 

t デフォルトの 
* プリ ンタ ドライバを 

* — PMOpen オープン する 

* オープンで きなければ 

* DriverBusy へ 

* _ WMAct i ve 

* アクティブ ウィン ドウの 
* レコー ドを 得る 
* ビットマップ レコード 

* テキス ト タイプ？ 

* でなければ PrintEnd へ 
* グラフ ボー ト 

* レク タング ル （左上） 

* 〃 （右下） 


* ピッツの 大きさを 意味す る 
* レク タング ル 

* 2 ページ 

* ピッツの 大きさ 
* テキス ト タイプ 

* _GMNewBits ピッツを 作成 

* エラーなら Pr intEnd へ 
本 ピッツへの ハンドルを 
* 静的 ワークに 収める 

* (ユーザー プロセスは 
* 動的 ワーク エリアを 

* アクセスで きない） 

本 ピッツを ロック 

t GMLockB i ts 


* マスクな し 
* コピー モード PSET 
* コピー 先レク タング ル 
t コピー 元レク タング ル 
* コピー 先ビッ ト マップ 
* コピー 元ビッ ト マップ 
I _ GMCopy 


* 印刷 環境 レコードの サイズ 
% MMChHdINew 
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addq . 丨 U, sp 

1U 

31 

move. 1 d0, prEvHdl (a5) 

92 

move. 1 ( 

iO. - (sp) 

93 

SXCALL ! 

U4E4 

94 

addq. 1 

114, sp 

95 

QC 

pea 

userProc (pc) 

yo 

97 

move. 1 

prEvHdl (a5) ， -(sp) 

98 

SXCALL 

$A4FA 

99 

addq. 1 

H8, sp 

00 

01 

St 

prnF 1 ag (a5) 

02 IDLE9: 



103 

moveq 

HO, d0 

104 

rts 


105 



106 KillMe: 

107 

pea 

qui tMsg (pc) 

108 

move, w 

j|$004, - (sp) 

109 

SXCALL 

$A2F6 

no 

addq. 1 

116, sp 

U1 

cmp. w 

#2, d0 

112 

beq 

I0LE9 

113 



114 

moveq 

M,d0 

115 

rts 


116 



117 Dr iverBusy : 
||8 

pea 

busyMsg (pc) 

119 

move, w 

H$001.-(sp) 

120 

SXCALL 

SA2F6 

121 

addq. 1 

16, sp 

122 

bra 

IDLE9 

123 



124 Printing: 



125 

c! r. w 

-(sp) 

126 

SXCALL 

$A4EF 

127 

addq. 1 

12, sp 

128 

cmp. 1 

IKdO 

129 

beq 

IDLE9 

130 PrintEnd: 



131 

SXCALL 

$A4E3 

132 

133 

move. 1 

prEvHdl (a5) , - (sp) 

134 

SXCALL 

$A038 

135 

addq. 1 

U, sp 

136 

137 

move. 1 

bitsHdl, - (sp) 

138 

SXCALl 

■ $AICB 

139 

addq. 1 

丨 R sp 

140 

141 

cl r. 1 

prEvHdl (a5) 

142 

cl r. 1 

bitsHdl 

143 

144 

sf 

prnF 1 ag (a5) 

145 



146 

moveq 

社 0, dO 

147 

rts 



148 

149 

150 SYSTEM1 : 


t ブロ ッ ク への 
* ハン ドルを 保存 
* 作成した ブロ ック 中に 
本 PMSetDefault . . 

* 歹 フォルトの 印刷 環境を 構築 


t 1 ー ザ ー プロセスを 指定して 
* デフォルトの 印刷 環境で 
t PMProcPrint プロセス 印刷 

* 1 始 


* 印刷 中 フラグを 立てる 


* 終了 確認 メ ッ セージ 
* はい/いいえ 
% _ DMError 

t 「いいえ J ? 

* ならば IDLE 9 へ 


* 印刷 不能 メ ッ セージ 
* 確認 
* DMError 


本 印刷 続行 
t 一 PMAction 

* 印刷 中？ 

本 ならば IDLE9 へ 

* _ PMCIose 

* 印刷 環境 レコ ー ドを 廃棄 
t MMHdIDispose 


i ピッツを 廃棄 
本 GMDisposeB i ts 


* 印刷 中 フラグを おろす 


t [システム イベント 1 ] 
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* 印刷 環境 レコードを 
* 廃棄す る 
* _MMHdlDispose 


* ピッツが 作成され たま ま？ 
* でなければ _T INI 丨 へ 

* ピッツを 廃棄す る 
i GMD i sDoseB i ts 


moveq lf-1, dO 
rts 


tst. I prEvHdl (a5) 

beq _TINI0 

move. I prEvHdl (a5) , - (sp) 

SXCALL $A038 
addq. I “， sp 

tst. I b i tsHd I 
beq _TINI1 

move. I b i tsHdl, - (sp) 
SXCALL $A1CB 
addq. I sp 

moveq HO, dO 
rts 


move. I 4 (sp) , a 3 

move. I 8 (sp) , a 4 

move. I b i tsHd I， aO 
move. I (aO) ， a6 

SXCALL $A132 


* l フ □セス 印刷用 

* ユーザー プロセス] 

* 印刷 環境 レコー ドへの 

* ハン ドル 

* 描画 範囲の レク タング ル 
* への ボイ ンタ 
* ピッツへの ハンドル 

* A6 : ピッツへの ボイ ンタ 

t GMGetGraph 


move, w eventRec_what2 (a5) ， dO 

cmp. w HI, dO 

beq AM Cl ose 

cmp. w H2, dO 

beq Al I C I ose 

moveq HO, dO 

rts 


moveq i-l, dO 
rts 


sf prnF I ag (a5) 
clr.l prEvHdl (a 5) 
c I r. I b i tsHd I 

tst. I dl 

bne _INIT_Err 

SXCALL $A360 
move. I dO, task I D (a5) 

moveq 10, dO 
rts 


* l システム イベント 2 J 

* タスクの 終了？ 

* ならば i*etsGoAway へ 

* 全 ウゴン ドウの クローズ？ 

* ならば LetsGoAway へ 


* [ アプリ ケー ショ ンの 
* 初期化を 行なう ] 


本 2 個 目の 起動？ 

* ならば JNIT 一 Err へ 

* _TSGetlD 
* タスク 丨 D を 得る 


188 

189 

190 TINI0: 

191 

192 

193 

194 

195 

196 

197 TINI1: 

198 

199 

200 
201 

202 userProc : 

203 

204 

205 

206 

207 

208 


151 SYSTEM2: 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 AllClose: 

162 

163 

164 

165 INIT: 


が 10 
ド ？ IN 
I ま T _ 
1 コまば 
理レ たれ 
処 境れ け 
了 環 さな 
終 刷 成で 
1 印 作 


AD 〇〇 〇〇 no 79 7/ 7— 71 7#» 7( 7— 7— 7( 7f 〇〇 〇〇 〇〇 〇〇 〇〇 〇〇 〇〇 〇〇 


227 


第 3 章 新設され た マネージ ヤ 


ocO : 


oc 1 : 


move. I 
move, w 
move, w 
move, w 
cmp. w 
bge 


(aO).al 
4 (al) , dl 
8 (al) , d2 
6 (a4) , dO 
d2, dO 
use rProcO 


Proc 1 0 : 
Proc2: 


move. I dO, d2 

move, w 8 (a6) , dO 
add. w dO, dO 
cmp. w d2, dO 
bcc userProcI 

move. I dO, d2 


sub. w 

dl, d2 

asr. w 

a d2 

subq. w 

m, d2 

move, w 

6(a1),d0 

sub. w 

2(al),d0 

move, w 

14(a1), a4 

move. 1 

10(a1), al 

and. w 

1115. dO 

move, w 

"ffff. d3 

1 sr. w 

dO. d3 

not. w 

d3 

move. 1 

10(a6), a2 

move, w 

dl, dO 

Isr. w 

#1， dO 

move, w 

14(a6), a5 

mu 1 u 

14 (a6), dO 

lea 

(a2, dO. I),a2 

move. 1 

16(a6). dO 

lea 

(a2, dO. 1), a3 

move, w 

6(a6), dO 

and. w 

#7, dO 

move, b 

«$ff, d4 

Isr. w 

dO, d4 

not. b 

d4 

move, w 

6(a6), dl 

1 sr. w 

#3-1, dl 

cmp. w 

dl, a4 

bcc 

userProcI 0 

move. 1 

a4, dl 

1 sr. w 

HI, dl 

move, b 

ItSff, d4 

bra 

userProc2 

1 sr. w 

11, dl 

addq 

m, dl 

tst. w 

d2 

bmi 

userProc9 


ビッ ト マップへの ポインタ 
Dl : Y 先頭 
丫 終端 

描画 範囲の 丫 終端 
描画 範囲の 方が 広い？ 
ならば userProcO へ 


ビッ ト マップ 丫 終端 
X 2 

ビッ ト マップの 方が 広い？ 
ならば userProcI へ 


本 D2 : ライ ン数 + 2 — 1 

* (X 終端 

* -X 先頭） 

本 A4 : 1 ライ ンの バイ ト 数 

* A 1 : ビットマップの 
t ベース ア ドレス 

t 半端な ドット 数 

* D3 : 右端の 1 ワー ド 用 マスク 

* ビット イメージへの ポインタ 

* ビッ ト マップの y 先頭 +2 
本 A5 : ピッツの 
* 1 ラインの バイ ト 数 

* A2 : ピッツを 読み出す 
* 先頭 アド レス （page 0) 

* A3 : ピッツを 読み出す 
* 先頭 ア ドレス （ page 1) 

* ピッツの 横 ドット 数 
* 半端な ドット 数 


* D4 : ピッツの 右端の 
本 1 バイ ト 用 マスク 

* ピッツの 1 ラインの ドッ ト 数 

本 -r 8 X 2 
本 ピッツの 横 S 

* ビットマップの 横？ 
t ならば userProclO へ 

* ピッツの 横 ， 

本 = ビット マッフ の 横 + 2 


描画すべき 範囲がない？ 
ならば use rProc9 へ 


生 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 沿 242 243 244 245 246 247 248 249 忠 


、3 7( 〇〇 Qu J 0^4 CO LO CO 7— 
5 ro 5 ro cu 6 cu 6 6 6 6 6 
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uuid u/, uberrrocD 

swap d7 

move, w dO, (al) + 

move, w dl, -2 (a 1, a4) 

dbra d7, userProc4 

and. w d3, -2 (al) 

and. w d3, -2 (al, a4) 

movem. I (sp) +, d!/a1-a3 

lea (al, a4) ， al 
lea (al, a4) , al 

lea (a2, a5) , a2 

lea (a3 r a5) , a3 

dbra d2, userProc3 


moveq #0, dO 
rts 


dc. b ’ PRNSMPL〆， 13 

dc. b ， プログラムを 終了 


move, w 

dl, d7 

subq. w 

#1, d7 

movem. 1 

dl/a1-a3, - (sp) 

moveq 

10, dO 

moveq 

#0, dl 

move, b 

(a2)+. d5 

move, b 

(a3)+, d6 

tst. w 

d7 

bne 

userProc5 

and. w 

d4, d5 

and. w 

d4, d6 

swap 

d7 

move, w 

#8-1, d7 

rox 1. b 

HI d5 

rox 1. w 

m, dO 

roxl. b 

#1, d6 

bcs 

userProc7 

rox 1. w 

HI, dO 


Isl. w #2, dl 
bra userProc8 


* ビットマップの 
* 1 ラインの バイ ト 数 
* - 1 ■♦力ら ンタ 


* D0 •• データ 作成 用 

* (even I ine) 

* Dl : データ 作成 用 
(odd I i ne) 


D5 

D6 


ページ 0 
ページ 1 


最後の バイ ト？ 

でなければ use rProc5 へ 
不要な ビッ トを マスク 
木 要な ビッ トを マスク 


本 タイル パターンを 

* 作成す る 

* (イージーな 方法では ある ) 


even I i ne 
odd line 


even I i ne 
odd I ine 


プリ ンタ ドライバの 
ビッ ト マップへ 


* 1 ライン 全部に 
* 書き込む まで ループ 
* 右端の 不要な 部分を マスク 

* (even I ine) 

* ” (odd I ine) 


* ビットマップ 
* 2 行 下に 

* ピッツべー ジ〇 次の 行へ 
* ピッツ ページ 1 次の 行へ 

* すべての ライ ンに 
* 書き込む まで ループ 


[ 固定 デ _ 夕] 


します。’ ， 13 


268 use 「 Proc3: 

269 

270 

271 

272 userProc4 : 

273 


275 

276 

277 

278 

279 

280 
281 

282 userProc5 : 

283 

284 

285 userProc6 : 

286 

287 

288 

289 

290 

291 

292 

293 

294 userProc7 : 

295 

296 

297 

298 userProc8 : 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 


7 userProc9 : 


319 

320 

321 

322 

323 

324 


qu i tMsg : 


nu n 
d d d 


w 

- w 

I - w 
X — 
o o r 
r r o 
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325 

dc. b 

' よろしいで すか？ ••(） 

326 busyMsg : 

327 

dc. b 

' PRNSMPL:’ ， 13 

328 

dc. b 

• 他の タスクが 印刷 中です。 

329 

330 

. even 


331 bitsHdl : 

332 

ds. 1 

1 t ピッツへの ハンドル 

333 

334 

. end 



■リスト 3 PRNSMPL 用 makefile 


1 PRNSMPL 用 makefile 

PRNSMPL. X: 

SKELTON, o PRNSMPL. o 

Ik 

-oPRNSMPL SKELTON PRNSMPL 

SKELTON, o: 

SKELTON, s WORK. INC 

as 

SKELTON 

PRNSMPL. o: 

PRNSMPL. s WORK. INC 

as 

PRNSMPL 


サブ ウインドウ マネージャの サンプル プログラム 


サブ ウインドウ マネージャの サンプル プログラムは， サブ ウインドウを 利用して 画面 上に 付 
萎 紙 （いわゆる ボス ト •イット* 1 ) 型の ウインドウを 表示す る プログラムです。 

* I : ポスト •イット は 米国 3 M 社の 商標です。 


(1) プログラムの 仕様 

SWSMPL を 起 Ifrt ると， 画面 中に 主 ウィンドウと， 8 枚の 付^紙 ウィンドウが 表示され 
ます (図 3)〇 

■図 3 SWSMPL の 実行 例 
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主 ウィンドウ について は 特筆す る ほど の 機能は 用意 さ れ ていません。 ドラッグと ク ローズの 
み 可能です。 

_ 紙 ウィンドウの 内部には， それぞれの プライオリ ティカ? 表示され ています。 それぞれの 
付 築 紙には 赤い ドラ ッ グリ ー ジョン と クローズ ボタンが 備えられ ていて， ドラ ッグと クロ— ズ 
力呵 能です （図 4)。 

■図 4 付箋 紙 ウインドウ 



ク ローズ ボタン 
ドラッグ リージ ョ 


主 ウィンドウが イ ン アクティブになる 際の サブ ウィンドウの 動き， プライオリティ による サ 
ブ ウィン ドウ 間の 重なり ぐあい 等を 5 鶴 忍して く ださい。 

なお， この プログラムは 一度に 1 つし か 実行で きず， 2 個 目 以降を 起動 させよう とした 場 
合， 1 個！ 目を アクティブ にして 終了し ます。 


(2) プログラムの 説明 

この プログラムの ポイント となる 部分は， マウスの 左 ボタンに よ る サブ ウィンドウの 操作 
( SWSMPL.S : 70 〜 199 行)， 複数の ウィンドウを も つ 場合の アッ プ デート 処理 
( SWSMPL.S : £01-240 ft ), そして， サブ ウィンドウを もつ 場合の アク ティべー ト避理 
( SWSMPL.S : 242-270 ft ) です。 

• マウスの 左 ボタンに よる サブ ウインドウの 操作 
普通の ウィン ドウなら ば SXGallWindM な どで 处理 でき る ことを， サブ ウィン ドウの 場 
合は すべて 自分で 行わなければ なりません。 この プログラムでは， ドラッグと クローズ ボタン 
の 処理を 行っ ています。 実際の 処理を 行っ ている のは 88 〜 199 行の サブルーチン 
SubWinProcess で， 70 〜 86 行では， どの サブ ウィンドウ に対して 处理を 行うべき かを 調 
ベて います。 

SubWinProcess では， まず マウスが 押された ポ イン トが サブ ウィン ドウ 内の どの 部分 
に 相当す るかを 調べ， それぞれの 部分に 対応した 处 理に 分岐し ます （95 〜 110 行)。 

112 〜 160 行では サブ ウィンドウの ドラッグ 处 理を 行って います。 $A 205 WMDrag は 
ウイン ドウ 定義 関数を 呼び出し ている ため 使用で きません。 かわり に， $A2£5 WMDragRgn 
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を 利用して サブ ウィンドウの アウ ト サイ ドリー ジョンを マウスに 追従して 動かして います。 
WMDragRgn は， 少しも 動かされなかった 場合， 移動させる リージョンを 空に してし まう 
ので， g 用 リージョンに アウト サイド リージョンを コピーして， それを 移動させる ことにし 
ます （ SWSMPL.S : 1 Z 1-1 Z 4： 行)。 

移赚， $ A 22 B WSDelist を 読んで， いったん サブ ウィンドウを 画面から 消し， レコ ー 
ド 内の 数値の 操作を 開始 します （ SWSMPL.S : 138 〜 140 行)。 WMDragRgn 力 ? 返した 
移動 量を 示す ポイントに したがって， アウト サイド リージョン， アップデート リージ ョン， グ 
ラフ ポート レク タング ルを スライ ドさせる ことで， WMMove と 同様な 結果が 得られます 
( SWSMPL . S : 146 〜 156 行)。 その後， 再度 サブ ウィンドウを 表示させる ことで， 新しい 
場所に サブ ウィン ドウが 開かれます （ SWSMPL.S : 158 〜 160 行)。 

165 〜 199 行では クロー ズ ボタンの 処理を 行って います。 その 内容は， マウスの 左 ボタン 
が 離される まで 座標を 追いつ づけ， ボイ ンタが クローズ ボタン 上に ある 場合は 反転した 状態の 
ボタンを， クローズ ボタン 上に ない 場合は 通常の 状態の ボタンを， $ A 18£ GMPlotlmg を 
使って 描画し ます。 マウスの 左 ボタン カ 5 ' 最終的に クローズ ボタンの 上で 離されたなら， $ A ££9 
WSDispose で サブ ウ ィン ドウを クローズ します。 

• 複数の ウィ ン ドウを も つ 場合の ア ップデ ー ト 処理 
ウィンドウを 1 つし かもたない タスクの 場合， 自分ので はない ウィ ン ドウを 対象に アップ 
デ ー トイ ベント カす 発生し た 場合に 書き 換えを 行っても， それほど の 時間の ロスには なりません 
が， 複数の ウィンドウを もつ 場合， どの ウィンドウを アップデートすべき かを 判断した ほうが 
スピード 的に 有利です。 

£07 - £13 行では 主ウ ィン ドウの ア ップ デート を 行って います。 202 〜 205 行の 判断で， 主 
ウィンドウを アップデートすべき である 場合に， この 切: 理を 行って います。 207 行で 引数を 
スタックに 積んで， $ A £0 D WMUpdate を 呼んだ 直後に スタックポインタの 補正を 行って 
いま せんが， こ れは 212 行で 呼んで いる $ A 20 E WMUpdtOver で 流用す る ためです。 全 
体と して スタックポインタの 値に 矛盾は 生じない ので 問題はありません が， スタックの 内容を 
変えて しまうよう な 理が 間に 入る 場合には 注意が 必要です。 

216 行から は サブ ウ ィン ドウの アッ プ デート 理で す。 

まず， 主 ウィンドウ がア ク ティ ブ かどう かを 判断 します （ SWSMPL.S : £16 〜 £17 行）。 
主 ウィンドウが イン アクティブの 場合， サブ ウィンドウは 表示され ている はずがない ので， 何 
も 行いません。 アクティブなら ば， 普通の ウィンドウ 同様の アップデート 処理を 行います 
( SWSMPL.S : ££3-£37 行)。 

籲 サブ ウィンドウを もつ 場合の アク ティべ— 卜 处 理 
サブ ウィンドウを 使用す る タスクは， アク ティべ ー トイ ベン トカミ 発生し， 主 ウィンドウが' ア 
タテ イブと なった と 判断で きた 場合， サブ ウイン ドウを サブ ウィン ドウ リスト に 追加す る 理 
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を 行わなければ なりません。 235 〜 行で， この 处理を 行って います。 

(3) プログラム リスト 

リスト 4 に WORK . INC ， リスト 5 に SWSMPL.S を 示します。 また， リスト 6 に 実 
行 ファイルを 作成す るた めの makefile を 示します 0 スケルトン は 標準の ものを そのまま 使 
用して ください。 


■リスト 4 SWSMPL 用 WORK.INC 


1 

2 

本 

* SX - WIND 0 W 


3 

A 

本 SWSMPL 



4 

5 

6 

* ワーク 定義 用 インク ルー 

* 

ド ファイル 

7 

8 
Q 

STKSIZE = 

2*1024 

* スタック サイズ 

10 

* ワークの 内容の 定義 


11 




12 

. offset 

0 


13 

cmdL ine : 


本 コマンド ライ ンの 
本 ア ドレスを 

14 

ds . 1 

1 

* 保存す る ワーク 

15 

envPtr : 


* 環境の ア ドレスを 保存 
♦ する ワーク 

16 

ds . 1 

1 


17 

winRect : 


♦ウィン ドウ レク タング ル 

* レコード 

18 

ds . 1 

2 


19 

paramF 1 g : 


i コマンド ライ ンの 

* 解析 結果を 示す 

20 

ds . w 

1 

* フラグ 

21 

eventRec : 


* イベント レコードの 先頭 

22 

eventRec _ what : 


t イベント コード 

23 

ds . w 

1 


24 

eventRec _ whom 1 : 


* 第 1 引数 

25 

ds . 1 

1 


26 

eventRec _ when : 


* イベント 発生 時 

27 

ds . 1 

1 


28 

eventRec whom 2 : 


* 第 2 引数 

29 

ds . 1 

1 


30 

eventRec _ what 2 : 



31 

ds . w 

1 

* タスク マネージャ 
* イベントの 種類 

32 

eventRec _ task 1 0 : 



33 

ds . w 

1 

* 送り手の タスク 1 D 

34 

eventMas k : 


* イ ベン ト マスクを 
* 保存す る ワーク 

35 

ds . w 

1 


36 

task 1 0 : 


* タスク 1 D を 保存す る ワーク 

37 

ds . 1 

1 


38 

w i nPtr : 


* ウィンドウ レコードを 




* 作成す る 場所 

39 

ds . b 

$72 


40 




41 

wi nAct i ve : 


* アクティブ フラグ 

42 

ds . w 

1 


43 

rgnHdl : 


* 作業用 リージ ョ ン への 

t ハン ドル 
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44 

45 dragRect : 

ds. 1 

1 

* ドラッグ 可能 領域を 
* 意味す る 

46 

47 

48 sWinPtrList: 

ds. 1 

2 

* レク タング ルレ コード 

* サブ ウ ィン ドウ レコード 

49 

50 

51 WORKS IZE: 

52 

ds. 1 

8 

* への ポイ ン タの リス ト 

* ワークの 終了 


■リスト 5 SWSMPL.S 


8 

9 

0 

1 

2 

3 

4 

5 

6 

7 

8 

19 


SX-WINDOW 

SWSMPL 

初期化 & 終了 & イ ベン ト 処理 モジュール 


. include DOSCALL. MAC 

. include SXCALL.MAC 

. xdef _INIT, TINI 

. xdef Idle 

. xdef MS L DOWN, MSLUP, MSRDOWN, MSRUP 

. xdef KEYDOWN, KEYUP 

. xdef UPDATE, ACTIVATE 
. xdef SYSTEM!, SYSTEM2, SYSTEM3, SYSTEM4 

. include WORK. INC * ワーク エリアの 内容を 

* 定義す る ファイル 


20 WIN0PT 

= 

%0000 

♦ウィン ドウ オプション 

21 WIN X 

= 

128 

* ウィンドウ 初期 X 

22 WIN Y 

= 

24 

* ウィンドウ 初期 y 

23 SWIN X 

= 

120+16 

* サブ ウィン ドウ 初期 X 

24 SWIN Y 

= 

28 

* サブ ウィン ドウ 初期 y 

25 SWIN 

= 

8 

* サブ ウィンドウ 個数 

26 





27 

. text 




28 IDLE: 



* 

アイ ドル イベント] 

29 MSLUP: 



本 

レフ ト アップ イ ベン ト 

30 MSRDOWN: 



本 

ライ ト ダウン イ ベン ト 

31 MSRUP: 



* 

ライ ト アップ イ ベン ト 

32 KEYOOWN: 




キー ダウン イベント 

33 KEYUP: 



* 

キ ー アッ フイ ベン ト 

34 SYSTEM3: 



* 

シス テ厶イ ベン ト 3 

35 SYSTEM4: 



* 

システム イベント 4 

36 

moveq 

HO, dO 

* 以上の イ ベン トでは 




* なにもし ない 

37 

rts 




38 





39 





40 MSLDOWN: 



本 丨 

[レフ ト ダウ ンイ ベン ト 

41 

move. 1 

eventRec_whom1 (a5) , aO 



42 

lea 

wi nPtr (a5) , a2 

* 自分の ウィン ドウ 上で 

43 

cmp. 1 

a2, aO 

* 発生した か？ 

44 

bne 

MSLD_SUB 

t 

違うなら MSLD_SUB へ 

45 





46 

tst. b 

winAct i ve (a5) 

* 現在 ウィン ドウは 


アクティブ か？ 
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bne 

pea 

SXCALL 
addq. I 
bra 


cmp. w 
beq 

moveq 

rts 


moveq 

rts 


lea 

moveq 

move. I 

beq 

cmp. I 

bne 

bsr 

move. I 

addq. I 
dbra 

moveq 

rts 


move. I 


pea 

SXCALL 
addq. I 

move. I 
SXCALL 
addq. I 
move. I 

move. I 
pea 

SXCALL 
addq. I 
beq 


MSLD1 

(a2) 

$A1FE 
“， sp 
MSLD9 

eventRec (a5) 
(a2) 

SA3A2 
18, sp 
dO 

MSLD9 

林 7, dO 
C I oseBttn 

#0, dO 


アク ティ フ なら MSLD1 へ 
— WMSe I ect 
アクティブに する だけ 


* ウィン ドウ 処理 

* — SXCal IWindM 

* どこも 操作され なかった？ 

* ならば MSLD9 へ 

* クローズ ボタン？ 
t ならば GloseBttn へ 


M, dO 


sWi nPtrL is t (a5) , a4 
HSWIN-I, d7 

(a4),dl 

MSLD_SUBI 

eventRec_whom1 (a5) , d 1 

MSLD_SUB1 

SubWinProcess 
dO, (a4) 

#4, a4 

d7, MSLOJUBO 
¢0, dO 


リス トの 先頭 アド レス 


サブ ウィンドウ 
レコ ー ドへの ボイ ンタ 
クローズされ ているなら 
MSLD_SUB1 へ 
押された のは 
この サブ ウィン ドウの 上？ 
でなければ MSLDJUB1 へ 

サブ ウィンドウ 処理 
結果を リス トに 戻す 

次の サブ ウィン ドウへ 
個数 分 繰り返す 


dl, a2 


(a2) ^ 

$AI31 ^ 

H, sp 

eventRec_whomZ (a5) , - (sp) 
$A13F 
H sp 
dO. dl 

dl, - (sp) 

SWDragRect (pc) 

SAI56 
#8. sp 
SWProc9 


[ サプ ウィン ドウ 処理 1 
サブ ウ ィン ドウ 
レコ ー ドへの ボイ ンタ 

サブ ウィン ドウ 内部 
GMSetGraph 


t マウスが 押された ポイントを 
6M6I oba I ToLoca I 
で □一カ ル 座標系に 変換 


* ドラッグ リー ジョン の 上？ 

* GMPt I nRect 

* でなければ 
本 SWProc9 へ 


47 

48 

49 

50 

51 

52 MSLD1: 

53 

54 

55 

56 

57 

58 

59 

60 
61 

62 MSLD9: 

63 

64 

65 

66 CloseBttn: 

67 

68 

69 

70 MSLD_SUB: 

71 

72 

73 MSLD SUB0: 

74 

75 

76 

77 

78 

79 

80 

81 MSLD SUBI: 

82 

83 

84 

85 

86 

87 

88 SubWinProcess: 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 


A q. . 

3 3 c d t q 
6 6 X d s 6 

p PS 3 t b 
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118 

119 

120 
121 
122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 SWProc9: 

162 


move. I dl, - (sp) 

pea SWCBoxRect (pc) 

SXCALI $AI56 

addq. I 18, sp 

bne SWC I oseBox 

SXCALL $A210 
pea (aO) 

SXCALL $A131 
addq. I H. sp 

move, w H%001 1, - (sp) 

SXCALL $A149 
addq. I #2. sp 

move. I $48 (a2) , - (sp) 

move. I rgnHdl (a5) , - (sp) 
SXCALL $A160 
addq. I 18, sp 


c I r. I 
move, w 
pea 
pea 

move. I 
move. I 
SXCALL 
lea 

move. I 
tst. I 
beq 

pea 


クローズ ボタ ンの 上？ 
GMPtl nRect 
_ ならば 

SXGI oseBo) (へ 

WMGraphGet 

ウィン ドウ マネージャの 
グラフ 永ー ト 
GMSetGraph 


2 ページ アクティブで 
ラバー バン ドを 描画 
GMAPage 


本 アウ ト サイ ドリー ジョ ンを 
* 作業用 リージョンに コビー 
% _ GMCopyRgn 


- （ sp) > 

林 3, _(sp) 3 

dragRect い 5) 
dragRect (a5) 

eventRec_whoniZ (a5) , - (sp) 
rgnHdl (a 吾 ).- (sp) 

SA225 
22 (sp), sp 
dO. dl 
dO 

SWProc9 


(a2) 


ユーザー プロセスは 無し 
上下 左右に ドラッグ 許可 
ドラッグ 可能 領域 
ドラッグ 可能 領域 
* ドラッグ 開始 ポイント 
イン サイ ドリー ジョン 
WMDragRgn 


SXCALL $A22B 
addq. I H4, sp 


* 少しで も 動いた？ 

* 動いて いなければ SWProc9 へ 

* 一旦 リス トから 外して 
* 表示 停止 
* WSDelist 


pea 


(a2) 


SXCALL $A131 
addq. I H, sp 


サプウ ィン ドウ レコードの 
値を 操作 開始 
GMSetGraph 


move. 

move. 

SXCALL 

addq. 

move. 

move. 

SXCALL 

addq. 

move. 

SXCALL 

addq. I 


pea 


dl, - (sp) 

$48(a2),-(sp) 

$A162 

18. sp 

dl, - (sp) 

$50(a2),-(sp) 

SA162 

H8, sp 

dl, - (sp) 

SA137 
H sp 


(a2) 


SXCALL SA22A 
addq. I 14, sp 

move. I a2. dO 


ネ アウ ト サイ ドリー ジョンを 

* _6MSI ideRgn 
* で スライド 

本 アップ デー トリ ー ジョ ンを 
t _ GMS I i deRgn 
本 で スライド 

* グラフ ボー トレク タング ルを 

* GMS I i deGr aph 
本 で スライド 

t 以上で WMMove 相当の 
* 処理が 完了 
* 新しい 位置で リ ストに 
* 加えて 再 表示 
t WSEnl ist 


返り 値は 

サブ ウ ィンド ウレ コード 


no 7/ 〇〇 Qu n nIL OJ -4 CJ no 7/ 

nj ] nj J n 1— n 1— 1— 1— 1— 1— 
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3 サンプル ブロ グラム 


本 [ クローズ ボタンの 処理】 
* 最初は 押されて いる 状態 
t まず ボタンの 状態を 
* 描画させる 

I EMLWa i t 

* 左 ボタンは 離された？ 

本 ならば SXCBoxRel へ 

t .EMMSLoc 
* 現在の マウスの 位置 
* クローズ ボタン 中？ 

* GMPtl nRect 

* 前と 状態が 変わって いる？ 
* 変わって いなければ 

* SXCBoxLoop へ 


* MSHideCsr 

* マウス ポインタを 消して 
* 現在の ボタンの 状態に 
* 合わせて 

* クローズ ボタンの 位置 
i クローズ ボタンの 
* プロ ッ ト イメージ 
t GMP I 〇 t Img 
* で 描画 

* MSShowCs r 

* マウス ポインタを 再 表示 
* 離される まで ループを 
* 繰り返し 

* 結局 ボタン 上で 離された？ 

* 違う のなら SWProc9 へ 

* サブ ウィンドウを 廃棄 

* — WSDispose 


* 返り 値で 廃棄した ことを 通知 


* [ アップ デ ー トイ ベン ト】 

本 自分の ウィン ドウ 上で 
* 発生した か？ 

* 違うならば UPDATE0 へ 


dl 

SWProc9 


* ウィンドウは アクティブ？ 

* でなければ サブ ウ イン ドウは 


tst, I 
beq 

pea 

SXCALL 
addq. I 

moveq 

rts 


move. I eventRec_whoml (a5) , a 1 
lea winPtr (a5) , a2 


cmp. 1 

al, a2 

bne 

UPDATE0 

pea 

(a2) 

SXCALL 

$A200 

bs r 

DrawGraphMa i n 

SXCALL 

$A20E 

addq. 1 

R sp 

bra 

UPDATE9 

tst. b 

winAct i ve (a5) 

beq 

UPDATE9 


rts 


moveq HI, dl 
bra SWCBoxO 


SXCALL. $A0AC 
tst. I dO 
beq SWCBoxRe I 

SXCALL $A0A7 

move. I dO, - (sp) 

pea SWCBoxRect (pc) 

SXCALI $A156 

addq. I 118, sp 

cmp. I dO, dl 

beq SWCBoxLoop 


move. I dO, dl 
SXCALL $A06C 

move, w dl, - (sp) 

pea SWCBoxRect (pc) 
pea SWCBoxP Img (pc) 

SXCALL $A182 
lea 10 (sp) , sp 
SXCALL $A06B 

bra SWCBoxLoop 


190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 
201 
202 

203 

204 

205 

206 

207 

208 
209 


SWCBoxRe I : 


UPDATE: 


5 UPDATE0: 


163 

164 

1 65 SWC I oseBox : 

166 

167 

1 68 SWCBoxLoop : 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 SWCBoxO: 

181 
182 


を 


終 


画た 
始 描ん 
開を 積 
卜咅に 
I 内クて er 卜 
ウ2デウツし以| 
ド da プドタ 用 dt デ 
ン up ツンス 利 up プ 
ィ WM アィに を WMI ッ 
ウーで ウ前値 I ア 


•ネネ 本 ネ 


9 P 
)2 S 
2 2 
3 A 4 

($ aff 


0 

d 

unff 


3 4 LO 6 P 8 

oo oo oo oo oo oo 
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t 表示され ていないので 


218 



* 

UPDATE9 へ 

219 

lea 

sWinPtrList (a5) , a4 

* 

リス ト の 先頭 

220 

moveq 

#0, d2 

本 

サブ ウィン ドウ 番号 

221 

moveq 

HSWIN-1, d7 



222 UPDATE): 





223 

move. 1 

(a4)+, dl 

* サブ ウィン ドウ レコ ー ドへの 




本 

ポインタ 

224 

beq 

UPDATE2 

本 

ク ローズ されて いるなら 




本 

UPDATE2 へ 

225 

cmp. 1 

al, dl 

本 

アップ デ ー トする のは 




本 

この サプ ウィ ン ドウ？ 

226 

bne 

UP0ATE2 


違うならば UPDATE2 へ 

227 





228 

move. 1 

dl, - (sp) 

本 

この サブ ウィン ドウを 

229 

SXCALL 

$A20D 

本 

WMUDdate 

230 



* 

アッ プ デート 開始 

231 

bsr 

DrawGraphSub 

* 

サブ ウィンドウ 内部を 描画 

232 



* 

前に スタ ックに 積んだ 




本 

値を 利用して 

233 

SXCALL 

$A20E 

本 

WMUpdtOver 

234 

addq. 1 

“， sp 

* 

アッ プ デー ト 終了 

235 UPDATE2: 





236 

addq 

a d2 

本 

サブ ウィ ン ドウ 番号 +1 

237 

dbra 

d7, UPDATE! 

* 全部 調べる まで ループ 

238 UPDATE9: 





239 

moveq 

110, dO 



240 

rts 




241 





242 ACTIVATE: 




[ アク ティ ベイ ト イベント ] 

243 

move. 1 

eventRec whoml (a5) , dO 



244 

beq 

ACT9 



245 

lea 

wi nPtr (a5) , aO 

* 

自分の ウィン ドウが 

246 

cmp. 1 

a0, dO 


アクティブに なった？ 

247 

bne 

ACT0 

本 

違う のなら ACT0 へ 

248 

tst. b 

winActi ve (a5) 



249 

bne 

ACT9 



250 





251 

St 

winActi ve (a5) 

拿 

アクティブ フラグを セット 

252 





253 

lea 

sWinPtrList (a5) , a4 

本 

リス ト の 先頭 

254 

moveq 

ItSWIN-l, d7 



255 ACT1: 





256 

move. 1 

(a4)+, dO 

本 

サブ ウ ィン ドウ レコー ドへの 




* 

ポインタ 

257 

beq 

AGT2 

* 

クローズされ ているなら 




* 

AGT2 へ 

258 

move. 1 

dO, （ sp) 

本 

この サブ ウィ ン ドウを 

259 

SXCALL 

$A22A 

本 

WSEnl ist 

260 

addq. 1 

U, sp 

* 

で リス トに 加える 

261 ACT2: 





262 

dbra 

d7, ACT1 

本 

繰り返し 

263 





264 

bra 

ACT9 



265 ACTO: 





266 

sf 

wi nAct i ve (a5) 

本 

アクティブ フラグを 




本 

リセット 

267 ACT9: 





268 

moveq 

#0, dO 



269 

rts 




270 





271 SYSTEMI : 



本 

[ システム イベント 1 】 

272 SYSTEM2: 



本 

[ システム イベント 2 】 

273 

move, w 

eventRec 一 what2 (a5) ， dO 
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3 サンプル ブロ グラム 


#1, dO 
Al I Close 
#2, dO 
Al I Cl ose 
»20, dO 
Wi ndowSe I ect 

#0, dO 


M, dO 


wi nPtr (a5) 

$A1FE 
R sp 

HO, dO 


dl 

_INIT_reEnter 

winRect (a5) , dO 
paramFI g (a5) , dl 
HO, dl 


* タスクの 柊 了？ 

本 ならば LetsGoAway へ 

* 全 ウィン ドウの クローズ？ 
t ならば LetsGoAway へ 
本 ウィン ドウの セレクト？ 

本 ならは '* WindowSel ect へ 


* 自分の ウィン ドウを 
* セレ ク トする 
* WMSelect 


* [ アプリ ケー シヨ ンの 

* 初期化を 行なう ] 

* 2 度 目の 実行？ 

* ならばな にもせ ずに 終了 


* * -W オ プショ ンが 
* 指定され た？ 

* 指定され ていなければ 

* JNIT0 へ 

* 正しい レク タング ルが 
* 指定され たか どうかを 調べる 


本 TSGetWi ndowPos 
* デフ ォル ト 位置を 得る 

dO * ウィンド ウレ ク タング ルを 
* 作成 


SA35E 

dO, winRect (a5) 
jtWIN_X*$10000+WIN_Y. 
dO, winRect+4 (a5) 
$A431 


R dO 

JNIT4 
?16, dO 
JNIT4 

1512“ 10000 +51 2, dO 


274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 Al ICIose: 

285 

286 

287 

288 WindowSe I ect : 

289 

290 

291 

292 

293 

294 

296 _INIT: 

297 

298 

299 

300 

301 

302 


304 

305 

306 

307 

308 

309 


7 JNIT0: 


320 _INIT1: 

321 

322 

323 JNIT2: 

324 

325 


327 

328 

329 

330 


cmp. w 
beq 
cmp. w 
beq 
cmp. w 
beq 

moveq 

rts 


moveq 

rts 


pea 

SXCALL 
addq. I 

moveq 

rts 


tst. I 
bne 

move. I 
move, w 
btst 

beq 


move. I 

beq 

tst. w 

cmp. w 

ble 

swap 

swap 

cmp. w 

bgt 

swap 

swap 

bra 

SXCALL 
move. I 

add. I 

move. I 

SXCALL 

cmp. w 

bcs 
cmp. w 
bcc 

move. I 


o 

T 

丨 I 


d 

5 ), 

3 

4 
t 

c 1 - — 
6 T 1 T 
R 丨 d 丨 
n N » N 

w Id d 


n T 
d I 


d d d 


を ？ 

ズ 上 は 
ィ 以ズ 
e サ へ 6 へイ 
od の 9 . T 4 1 T 4 サ 
PM プはい N1 は N1 プ 
ra ツ ド さ— 1 ド— - ツ 

to 卜 | 小 ば | ば 卜 
66 クるモ りら モらク 
TS スめ 面よ な 面な ス 
1 デ 求 画 4 画 デ 

本本 本本 本本 ネ本本 
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lea 

moveq 

moveq 


SXCALL 
move. I 


$A15A 

aO, rgnHdl (a5) 

SWRect (pc) 

(aO) 

$A15F 
#8, sp 

sWi nPtr L i s t (a5) , a4 
H100+SWIN, d6 
HSWIN-1. d7 


pea msgRec (pc) 

move, w dl, - (sp) 
SXCALL SA418 
addq •丨 #6, sp 

moveq H-2, dO 
rts 


* WINDOWSELECT の 

ネメ ッ セージ レコード 
* 親の タスクに 送信 

* TSSendMes 


* 初期化し なかった 


* ウィンドウ 内部の 描画の 
* 準備を する サブ ルー チン 
t GMNewRgn 


* サブ ウィンドウの 大きさに 
* リージ ョ ンを 設定 
* GMRectRgn 


♦リス ト の 先頭 
* プライオリティ 


* 512X512 


bra 


INIT5 


move. I #1024*$ 10000 +1 024, dO * デスク ト ップ サイ ズは 

* 1 024 X 1 024 

move, w H (-SWIN X), dragRect (a5) * ドラッグ 可能 領域の 

* 左上の 座標 x 

move, w j}(-SWIN_Y), dragRect+2(a5) * " y 

move. I d0, dragRect+4 (a5) * " 右下の 座標 


SXCALL SA360 
move. I d0, task I D (a5) 

move. I d0, - (sp) 

move, w #-1, - (sp) 

move. I IM， - (sp) 

move, w t$3HI6+WINOPT, -(sp) 


move, w 
pea. I 
pea. I 
pea 

SXCALL 
lea. I 
tst. I 
bmi 

st 

bsr 

moveq 

rts 

moveq 

rts 

SXCALL 
move, w 


M.-(sp) 
winTitle (pc) 
winRect (a5) 
winPtr (a5) 
$AIF9 
26 (sp), sp 
dO 

JNIT 一 Err 
wi nAct i ve (a5) 
DrawGraphl st 
10, dO 

lt-1, dO 


$A360 

dO, msgRec Tskid 


* TSGetID 

本 タスク I D を 得る 

* タスク I D 
* クローズ ボタン あり 
ネもっ とも 手前に 
* 標準 ウィンドウ 

* (ク D - ス •ホ* タンの み) 

* 可視 

t ウィンドウ タイトル 
* ウィンド ウレ ク タング ル 
* ワーク 上に 作成 
t WMOpen 
* ウィンドウを 開く 

本 エフー？ 

* ならば _INIT_Err へ 
* アクティブ フラグを セット 

* ウィン ドウ 内部を 描画す る 

* ( 最初の 1 回） 


初期化で きなかった 


TSGetID 


332 _INIT4: 

333 

334 _INIT5: 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 

345 

346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 INIT Err: 

362 

363 

364 JNIT 一 reEnter : 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 DrawGraphl st : 

377 

378 

379 

380 
38t 

382 

383 

384 

385 

386 

387 

388 

389 DGlstO: 


A q. 
3 3 c d 

6 6 X d 
p PS 3 
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3 サンプル プログラム 


390 

SXCALL 

$A35E 

* TSGetWi ndowPos 

391 

move. 1 

dO. - (sp) 

* デフ ォル ト 位置に 

392 

move. 1 

rgnHdl (a5),-(sp) 

* リージョンを 移動 させて 

393 

SXCALL 

$A16I 

* _ GMMoveRgn 

394 

395 

addq. 1 

#8, sp 

396 

move. 1 

d6, - (sp) 

本 プライオリティ 

397 

move. 1 

rgnHdl (a5) , - (sp) 

* リージョンの 位置/形に 

398 

clr. 1 

- (sp) 

* サブ ウィン ドウを オープン 

399 

SXCALL 

$A227 

* — WSOpen 

400 

lea 

12 (sp), sp 

401 

4 〇 2 

move. 1 

aO, (a4) + 

* ボイ ン タを リス トに 格納 

403 

subq. 1 

UK d6 

* プライオリティー 1 

404 

405 

406 

407 

408 DrawGraphMa i n : 

409 

dbra 

rts 

d7, DGlstO 

* 繰り返し 

本 ウィン ドウ 内部を 描画す る 
* サブ ル _ チン 
本 ウィン ドウ 内部を 描画 

410 

pea 

wi nPtr (a5) 

411 

SXCALL 

$A131 

本 GMSe tGrap h 

412 

413 

addq. 1 

14, sp 

414 

move. 1 

USOOlc 0006 . -(sp) 

* 描画 位置の 指定 

415 

SXCALL 

$A16E 

t _ GMMove 

416 

addq. 1 

“， sp 


417 

pea 

ma i nWi nMsg (pc) 

* 文字列を 描画 

418 

SXCALL 

$AI92 

t _ GMDrawStrZ 

419 

420 

421 

addq. 1 

rts 

14, sp 



422 


423 DrawGraphSub : 

424 * サブ ウィンドウ 内部を 描画す る サブルーチン 

425 吲数 
426 * D1 

427 纟 D2 

428 * 

429 


サフ ウィン ドウ レコードへの ボイ ンタ 
サブ ウィン ドウ 番号 


430 

431 

432 

433 

434 

435 

436 

437 

438 

439 

440 

441 

442 

443 

444 

445 

446 

447 

448 

449 

450 

451 


move. I dl, a2 

pea (a2) 
SXCALL $A131 
addq. I tf4, sp 

move, w 川， - (sp) 


SXCALL 
addq. I 
move, w 
SXCALL 
addq. I 
move, w 
SXCALL 
addq. I 
move, w 
SXCALL 
addq. I 

move. I 
move. I 
SXCALL 
addq. I 
move. I 


$A147 

n, sp 

#8, - (sp) 

$AI48 
#2, sp 

Will, - (sp) 

$A149 

12, sp 

moo. -(s P ) 

$A144 
#2, sp 

$4c(a2),-(sp) 
rgnHdl (a5),-(sp) 
$A160 
R sp 
(a2) ， a0 


* サブ ウィンドウ レコードへの 

* ポインタ 
* 内部に 描画 
本 __ GMSet Graph 


* フォアグラウンド 
* カラー は 黒 

* _ GMFor eCo I or 

* 背景 色は 白 

* _ GMBac kCo i or 

* 4 ページ 全部に 描画 
t — GMAPage 

* 背景 色で 描画 
t GMPenMode 


イン サイ ドリ ー ジョンを 
作業用 リージ ョ ンに コピー 
— GMCopyRgn 

ビッ ト マップ レコ ー ドへの 
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452 

move. 1 

2 (aO), - (sp) 

453 

move. 1 

rgnHdl (a5) , - (sp) 

454 

SXCALL 

$A162 

455 

addq. 1 

18, sp 

456 

457 

move. 1 

rgnHdl (a5) , - (sp) 

458 

SXCALL 

$A17B 

459 

addq. 1 

“• sp 

460 

461 

move, w 

#$00, -(sp) 

462 

SXCALL 

$A144 

463 

addq. 1 

#2, sp 

464 

move. 1 

rgnHdl (a5) , - (sp) 

465 

SXCALL 

$A17A 

466 

addq. 1 

R sp 

467 

468 

move, w 

noia-(sp) 

469 

SXCALL 

$A149 

470 

addq. 1 

#2, sp 

471 

move, w 

113, -(sp) 

472 

SXCALL 

$A147 

473 

addq. 1 

It2, sp 

474 

pea 

SWDragRect (pc) 

475 

SXCALL 

$A173 

476 

addq. 1 

R sp 

477 

move, w 

HO, - (sp) 

478 

pea 

SWCBoxRect (pc) 

479 

pea 

SWCBoxPImg (pc) 

480 

SXCALL 

$A182 

481 

lea 

10 (sp), sp 

482 

483 

move, w 

112, - (sp) 

484 

SXCALL 

$A18B 

485 

addq. 1 

12, sp 

486 

move, w 

mi,-(sp) 

487 

SXCALL 

$A147 

488 

addq. 1 

i2, sp 

489 

move. 1 

#$0030 000 2 ， - (sp) 

490 

SXCALL 

$A16E 

491 

addq. 1 

#4, sp 

492 

pea 

SWPri (pc) 

493 

SXCALL 

$A192 

494 

addq. 1 

U, sp 

495 

move, w 

r o* , do 

496 

add. w 

d2, do 

497 

move, w 

d0. - (sp) 

498 

SXCALL 

$A18F 

499 

addq. 1 

U, sp 

500 

501 

r ts 


502 

503 TINI : 

504 

cmp. 1 

#-2, dO 

505 

c n C 

beq 

_TINI3 

bub 

507 

lea 

sWi nPtr L i s t (a5) , i 

508 

move. 1 

USWIN-1, d7 

509 _T 1 N 1 0 : 


本 ポインタ 

* グロー バル 座標系に 
♦ 作業用 リージョンを 変換 
* GMSI ideRgn 


* 作業用 リージョン 内部を 
t GMFil IRgn 
* で 背景 色で 塗り潰す 

* フォアグラウンド カラ ーで 
* 描画 

t _ GMPenMode 

* サブ ウィン ドウの 枠を 描画 
* GMFrameRgn 


* アクセス ページを 
*0,1, 2 に 

t _ GMAPage 

* フォアグラウンド カラーを 
本 赤に 

* _ GMForeCo I or 

* ドラ ッグ リージ ョ ンを 
本 GMFillRect 
* で 塗り潰す 
* 通常 状態で 

* クローズ ボタンの 位置に 
* クローズ ボタンの 
* プロ ッ ト イメージを 
t _6MP I ot Img 
* で 描画 

本 2 4 ドット フォン ト 

* _GMFontKind 

* フォアグラウンド カラー は 黒 
t _ GMForeCo lor 

t サブ ウィン ドウ 中央に 
本 __ GMMove 

t サブ ウ ィン ドウの 
* プライオリティ （ 2 ケタ） 

本 GMDrawStrZ 
t で 描画 


* プライオリティの 末尾を 
t _ GMDrawChar 

* で 描画 


* [ 終了 処理 ] 

* 初期化を 行なわなかった？ 

* ならば _T INI 3 へ 

* リスト の 先頭 
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3 サンプル プログラム 


510 

move. 1 

(a4)+, dO 

511 

beq 

_TINI I 

512 

move. 1 

d0, - (sp) 

513 

SXCALL 

$A229 

514 

addq. 1 

#4, sp 

515 TINI1: 



516 ' 

dbr a 

d7. _TINI0 

517 



518 

move. 1 

rgnMdl (a5) r dO 

519 

beq 

_TINI2 

520 

move. 1 

dO, - (sp) 

521 

SXCALL 

$A15B 

522 

addq. 1 

U, sp 

523 TINI2: 



524 

pea 

winPtr (a5) 

525 

SXCALL 

$AIFB 

526 

addq. 1 

sp 

527 TINI3: 



528 

moveq 

#0, dO 

529 

rts 


530 



531 

. even 


532 winT i 1 1 e : 



533 

dc. b 

6 / 付箋 紙 ’ 

534 mainWinMsg: 



535 

dc. b 

’ 主ウィ ン ドウ •，(） 

536 SWPri: 



537 

dc. b 

■ 10., 0 

538 

. even 


539 SWRect: 



540 

dc. w 

0,0, SWINJ, SWIN_Y 

541 SWDragRect : 



542 

dc. w 

0, 0, 16, 28 

543 SWCBoxRect: 



544 

dc. w 

2, 2, 12, 12 

545 SWCBoxP Img : 



546 

dc. w 

% 000000 00J0000000 

547 

dc. w 

% 01111111 11000000 

548 

dc. w 

% 01111111 11000000 

549 

dc. w 

% 01111111 11000000 

550 

dc. w 

% 0111111 1 11000000 

551 

dc. w 

% 01111111 11000000 

552 

dc. w 

% 01111111 1 1 000000 

553 

dc. w 

% 01111111 11000000 

554 

dc. w 

% 0111 1111 11000000 

555 

dc. w 

% 1111111 U1000000 

556 



557 

dc. w 

% 00000000 00000000 

558 

dc. w 

% 01000001 01000000 

553 

dc. w 

% 00100010 01000000 

560 

dc. w 

% 00010100 01000000 

561 

dc. w 

% 00001000 01000000 

562 

dc. w 

% 00010100 01000000 

563 

dc. w 

% 00100010 01000000 

564 

dc. w 

% 01000001 01000000 

565 

dc. w 

% 00000000 01000000 


* クローズされ ている？ 

* ならば _TINM へ 

* この サブ ウィ ン ドウを 廃棄 

* — WSDispose 


* 繰り返し 

* リー ジョ ンが 
* 作成され ている？ 

* 作成され ていなければ 
* 廃棄 

* — GMD i sposeRgn 


本 ウィン ドウを クローズ する 

* — WMC lose 

* WMDispose でない ことに 注意 


* [ 固定 データ ] 

t ウィンドウ タイトル 

* ウィン ドウ 内部に 
* 描画す る 文字列 

* プライオリティの 
* 上位 2 桁 

* サブ ウィン ドウの 
* 大きさを 意味す る 
* レク タング ル 
* サブ ウィン ドウの 
* ドラッグ リージョンを 
* 意味す るレク タング ル 
* サブ ウ ィン ドウの 
t クローズ ボタンの 位置と 
* 大きさを 意味す る 
* レク タング ル 

* サブ ウィン ドウの 
* プロット イメージ 
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11000000 

11000000 

11000000 

11000000 

11000000 

11000000 

11000000 

11000000 

11000000 

11000000 


%11111111 11000000 


566 

dc. w 

567 


568 

dc. w 

569 

dc. w 

570 

dc. w 

571 

dc. w 

572 

dc. w 

573 

dc. w 

574 

dc. w 

575 

dc. w 

576 

dc. w 

577 

dc. w 

578 


579 msgRec : 


580 

dc. w 

581 

dc. 1 

582 

dc. 1 

583 

dc. 1 

584 

dc. w 

585 msgRec Tsk i d : 


586 

ds. w 

587 


588 

. end 


■ リスト 6 SWSMPL 用 makefile 


# SWSMPL 用 makefile 

SWSMPL X: SKELTON, o SWSMPL. o 

Ik -o SWSMPL SKELTON SWSMPL 

SKELTON, o: SKELTON, s WORK. INC 

as SKELTON 

SWSMPL. o: SWSMPL. s WORK. INC 

as SWSMPL 



% % % % % % % % % % 
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C 言語に よる 
ブロ グ ラミング 


前著 『 SX - WINDOW プログラミング』 と 本書では， SX ア 
プリ ケージ ヨンの プログラミングを アセンブリ 言語に よって 行 
5 方法を 述べて きました。 アセンブリ 言語に よる 記述は プリ ミ 
テイ ブ であるが ゆえに， SX - WINDOW の 仕組みが 見え やす 
く， 本質的な 理解の 助けになる という 面が ある ものの， 可読性 
に関しては いま 1 つです。 一方， 最近は C 言語に よる プロ グ 
ラミング も 主流と なって きています ので， 本書で も C 言語に 
よる 開発に ついて 述べて お吉 ます。 


|4 


C 言語と アセンブラの 関係 


SX アプリ ケー シ ョンを C 言語で 作成す る 場合， 通常の C コンパイラの 動作 環境に 加えて， 
いくつかの 準備が 必要です。 本書では， ユーザが C コンパイラを 使って 手軽に SX アプリ 
ケーシ ョンを 作成で きる よう， 付録 ディスクの 「SXerTool BOXJ に 必要な ファイルが 
収められて います。 ここでは， SX アプリケーションを 作成す るた めの C コンパイラの セッ 
ト アップに ついて 解説し ます。 

プログラミング について 語る とき， それを 言 ea する 言語は 本質的な 問題ではありません。 た 
だし， FORTH や LISP などの ように， 想定して いる CPU の アーキテクチャ 自体が ター 
ゲットと している MPU/CPU の アーキテクチャと 大き く 異なって いるよ うな 場合は 例外で 
すが。 

ことに， 私たちに もな じみ 深い C 言語な どは， 「高級 アセンブラ」 という 陰口を 叩かれて い 
る ほど 「低級」 な 言語です。 C プログラマの 達人 （少なく と も パソコン 上の 处 理系の 達人） は， 
G の ソースが どのような コードに 落とされ るかを 意識して 書いて いるは ずです。 コンパイラ 
を 通す と 思い どおりの コー ドが 得 られな C 、場合は， インライン アセンブラ で 直接 ア セン ブラの 
コードを 書いて しまう こ とも あるで しょう。 

一方， X68000 の MPU である M 〇 6800 0 は， ほかの CPU と 比較す る！:， ア セン ブ 
ラに よる 開発が 非常に 容易な 部類に 属します。 簡潔で 読みやすい 二ー モニック， 強力な アド レッ 
シング モード， 豊富な レジスタ など， プログラマに とって 有利な 条件が いくつ もあります 0 
ちょっと 気の き いた プリ プロ セ ッサで も あれば， C 言語に 近い 可読 丨 生を 獲得す る こと がで き 
ます。 さすがに 大規模な プログラム や， 複雑な 計算な どを ともなう ものの 言 强 には 向きません 
が， それ 以外の プログラムなら ば， それほど 面倒では ない， と 個人的には 考えて います。 

このように， 少なくとも X68000 にか ぎって いえば， C 言語と アセンブラの 距離は 非常に 
近く， 本書で C 言語を 持ち出す まで もない， と 考えて いました。 

しかし， そうは いっても， C 言語に よる 開発は， アセンブリ 言語に くらべれば 楽です。 〇 
言語は わかる けれども， アセンブラは いま 1 つ， という 方 も 多いで しょうから， C 言語に よ 
る プロ グラミ ング についても 触れない わけには いかないで しょう。 

また， SX-WINDQW のよう な ウインドウ システムの アプリケーションは， オブジェクト 
指向 プロ ダラ ミ ングが 有効で あ る ことが 知られて います。 オ ブジェク ト す 旨 向の 言語^理 系と し 
ては， C の披張 版で ある C++ がよく 知られて いますが， すでに X68000 でも G+ + (GNU 
C++) が 動いて いますし， xc を ベースと した C++ 免 yi* 力 5 ' 登場す る 可能 f 生 もあります。 c 
++ で SX アプリケーションが 開発 できるようになるまで， その 前段 階と して， C による プ 
ログ' ラミング' を 習得して おく こと も， けっして 無 lirT はない はずです。 
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1 C 言語と アセンブラの 関係 


|1 _ 開発に 必要な 環境^ 

X 68000 で 利用で きる C 言語の 処理 系には 現在い く つかの 種類が あり ますが， 本書では， 
もっとも 一般的な シャープの G コンパイラ PR 0-68 K (以下， XC 2) を 利用す る 場合を 例 
にと る ことにします。 XCJ 2 は， 方言と いう ほどの 方言 もない， 上 W 交 的 素直な ANSI 準拠 コ 
ンパ イラです から， ほかの 处 理系 （ GNUC コンパイラ 等） を 利用す る 場合で も， 手直しは 最 
小 限です むと 思われます。 

XC 2 で SX アプリケーションを 開発す るた めには， XC 2 が 動作す る 環境が 必要な ことは 
いうまで もありません が， このほか にも いくつかの ファイルが 必要です。 以下に 挙げる フ ァイ 
ルは 付録 デイ スタに 収めて あり ますので， APPENDIX の 「付録 デイ スク 『SXer Tool 
Box 』 の 利用」 をよ く お読みの うえ， ご 利用く ださい。 


參 SX し丨 巳. し 

SX コールを 利用す るた めの ライブラリです 0 

この ライブラリは， SX 開発 キットに 収められ ている 糸 屯 正 ライブラリを， シャープ 株式会社 
の ご 好意に より， その 中の ごく 一部の 関数を 除いて 収録 させて いただきました。 この 中には， 
XC 1 等で 市 j 用で きる. A 形式の ライブラリ も 収録され ています。 

この ファイルは， ほかの ライブラリと 同樣 環境 変数 lib で ネ 旨定 された ディレクトリに 置 
いてく ださい。 

鲁 SX し丨巳 .H 

SXLIB.L の 関 ■の プロ ト タイ プ 宣言 等を 行う ヘッダ フ ァイ ルです 0 
この ファイルは， ほかの ヘッダ ファイル 同樣 環境 変数 include で 指定され た ディ レクト 
リ に 置いて ください。 


• SXDEF.H 

SXLIB . H の 中で イ ン クルー ドされ る タイ プの 宣言 等を 行う へ ッ ダフ アイ ルです 0 
この ファイルは， ほかの ヘッダ ファイル 同様， 環境 変数 include で 指定され た デイ レクト 
リに 置いて ください。 


• MAIN _ R.O 

R タイプの モジュールを 作成す る 場合の スタート アップです。 C タイプの モジュールを 作 
成す る 場合には， SXLIB . L 中の スタート アップが 使用され るた め， 必要ありません。 

この フ アイ ルは， 環境 変数 lib で 指* 定さ れた デイ レクト リ に 置いて ください 0 


すでに XC 2 による 開発 湯 境 力 整って いる 方なら ば， 以」1 の ファイルを， それぞれ 指定の デイ 
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レクト リ に 収める だけで， SX アプリ ケー シ ヨンの 開発 準備は 完了です 0 
コンパイルに 必要な RAM や ディ スタの 容量は， SX アプリ ケー シヨ ン 以外を 開発す る 場 
合と それほど 変わりません。 幸い， XG £ はかろう じて フロッピー ベースの， 主記憶 バ 
イトで も 利用 可能な ので， 投資は 最小限で すみます （が， せめて ハードディスク くらいは 増設 
される こと を おすすめし ます)。 
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|4 2 \ 〇 雪 語に よる 開発の 制限事項 

SX - WINDOW の 実行 ファイルは， 基本的には Human の 実行 ファイルと 同形 式です。 し 
かし， その プログラムの 内容には SX アプリケーション 独自の 約束事が 存在す る ことは ご存 
じのと おりです。 たとえば， 「テキス ト エリアと ワーク エリアの 使い分け」 であると か， 「リ 
エン ト ラン トな コードの 記述」 といった ことは， Human 上で 実行す る プログラムでは 考 
應 する 必要の なかった 概念です。 

XC 2 などは， もともと Human 上で 実行され る プログラムを 生成す る ことを 目的と して 設 
計され ている 処理 系です から， こ ラした SX の 約束事は 当然ながら 考慮され ていません。 そ 
のた め， XC 2 等に よって 生成され る プログラムは， 理想的な までに SX アプリケーション 
らしい SX アプリケーションとは なりません。 

XC 2 で SX アブリ ケー シ ョンを 作成す る 場合に 特有な， 少 々厄介な 問題に ついて 説明し ま 
す。 

(1) 原則として C 型の モジュールを 生成す る 

XC 2 は static な 変数， グローバル 変数を データ セクションに 置きます。 また， ライブ ラ 
リ 等が 内部で 静的な 変数を 用意し ている 場合が ある ので， 完全に リエント ラント な プログラム 
を 生成す るのは 難しく なって います。 

このため， XC 2 をべー ス とする 開発 キッ トは C 型の モジュールを 作成す る こ とを 前提と 
してつく られ ています。 

R タイプの モジュールを 作成す る 方法は 用意され ています が， そこには い くつ もの 制限 事 
項が あ ります。 

〇 タイ プの 作成は でき ません が， C タイ プ 用の スター ト アップ （ SXLIB . L 中の 
__ MAIN . O ) の モジュール ヘッダを ’ OBJC ’ から ’ OBJO ’ に 書き換える だけな ので 難しい 
ことではありません。 〇 タイプの モジュールを つくる 場合は， 〇 タイプ 用の スター ト アップ 
を イ隹 成して リンクす るよう に するとよ いでし よう。 

(2) にの） ヒープの 扱いが SX - SYSTEM とな じまない 

X 02 には malloc 0 等の ヒープを 扱う 関数が 用意され ています （ここでい う ヒープは， メ 
モリ マネージャの ヒープ ゾーンとは 異なります ので， 注意して ください)。 これによ る ヒープ 
の 理 は， SX - SYSTEM とは あまりな じみが よ く ありま せん。 

Human 上では， XC 2 で 作成した プログラムは， ヒープを 扱う， 扱わない に 関わらず， 起 
動 直後に 自分 専用の ヒープと して 64 K バイ トの メモリ ブロ ッ クを〇 S に 請求し ます* 1 。 こ 
の 中から ， malloc 〇 などで 請求され ただけ メモリ ブロックを 切り分けて， アプリ ケー ショ 
ンに 与えます。 この， ヒープ ゾーンと して 石萑 f 呆 された 64 K バイトの メモリ ブロックは， これ 
の」! の サイズに 披 張され る こ とは あっても， 不必要に なった 分を 〇 S に 返却す る こ とは あり 
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ません* 2 。 

SX-SYSTEM 上で も， 実現す る 方法 こそ 異なります が， これと同じ 手法が とられます。 

C の ヒープは ワーク エリ ア 中に 用意され ます。 デフ オルトでは， ヒープと して 64K バイト， 
スタック として 64K バイト， 計 128K バイ トが 劍氐 でも 確保され ます。 何もし ない プロ グ 
ラムで も， これは 同じです。 ありていに いえば， 非常に 無駄に メモリ カ 5 ' 消費され てし まう わけ 
です が， これを 理由に XG2 を 責める のは 多少 酷では あ ります。 

* 丨： コマン ドラ インから/ HEAP : 128 などと 指定す る ことによって サイズを 指定す る ことは 可能です。 
逆に， こうした オプションを 指定し ないかぎ り， つねに 64K バイトが 自動的に 確保され てし まう， 
という ことで もあります。 CUB.U あるいは SXUB.L の 中の __MA 旧. ◦を 修正す る ことによ って， デ 
フォルトの サイズを 変更す る ことは 可能です が， あま リ 柔軟性の ある 方法とは いえません。 
*2:H U man では， sbrk 〇 関数な どで ヒープを 拡張する ことが 可能です が， SX アプリ ケーシ ヨンでは 
この 関数は 使用 不可です。 


(3) ワーク エリアは スタック + ヒープと して 使用， コモン エリアは 使用 不可 

XQ2 で 使われる 変数は， 大きく static 変数と auto 変数の 2 種類に 分けられます。 この 
うち， static 変数 （XC2 では， グロー パ、 ル 変数 も static として 扱われます） は データ セク 
シ ヨンに 置かれ， ダ' イ レク ト アドレッシング、 で アクセス されます。 auto 変数は スタック フ レー 
ム上に 作成され， レジスタ A6 を ベースと して アクセス されます 0 

これらは コン ハ °イ ラの 仕様な ので， SX アプリケーションを 作成す る 場合で も 同じです。 一 
方， SX アプリケーションでは， ワーク エリア 中に 変数を 置 〈のが スマートな 方法です。 この 
折衷案と して， XC2 で イ专 成した SX アプリケーションは， ワーク エリアを 図 1 のように 利 
用して います。 

■図 1 ワーク エリアの 使用 状況 


スタック 

環 

境 

ヒ - 

-プ 


— ワーク エリ ア 先頭 

最低 8K バイ ト +1K バイ ト （/STACK : 8 を 指定） 

デフォルトで 64K バイ ト +1K バイ ト （つねに 1K バイ トの 余裕を 持つ） 
親の 環境が コ ピーされ る 
最低 8K バイ ト （/HEAP : 8 を 指定） 

デフ オル ト で 8K バイト 


グローバル 変数を ワーク エリア 中に 作成で きれば リエン ト ラントと なる のです が， これが 
R 型の モジュールを 作成す る 場合の 障害 となって います 0 
また， コモン エリアは 利用で きません。 

(4) 一部の DOS コール 関数 IOCS 関数は 使用 不可 

アセンブリ 言語で 作成した SX アプリケーション でも， 次の ような DOS コール， IOCS 
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2 C 言語に よる 開発の 制限事項 


•VRAM (テキスト， グラフィック ともに） を 操作したり， 画面 モードを 変更した りする 
DOS/IOCS コール 

•マウス やソフ トキー ボードを 操作す る DOS/IOCS コール 
•プロセス 管理に 直接 タッチす る DOS コール 

C 言語で 作成した SX アプリ ケー シ ヨンで も 同様で'， これらを 呼び出す 関数は 利用で きま 
せん。 

このほかに， 

• シグナル 関係 

•スト リーム 入出力 関数の 一部 （ fcloseall 0 等） 

•メモリ ブロックを 操作す る 関数の 一部 （allmem 〇, sbrk () 等） 

•標準 入出力を 利用す る 関数 （printf 〇, scanf 〇 等） 

• BASIC ライ ブラ •リ の ほ とん ど 


等 も 使用で きないと 考えた ほう 力 す 無 « です。 

(5) R 型の モジュールを 作成す る 場合の 制限 _ 

G 型の モジュールが 前提で あるとは いえ， R 型の モジュール も 制限 付きながら 作成 可能で 
す。 こ の 場合， 次の よう な 制限が 存在 します。 

① static 型 変数， グローバル 変数は 使用で きません。 使用す る 場合は， 副作用を よく 理解し 
たうえで 使用す る 必要が あります。 したがって， 変数は すべて auto 変数と して 作成して く 
ださ ぃ。 

② ヒープ や ファイルの 管理は， static な 変数に よって 管理され ています。 したがって， コー 
ドを 共有す る タスク 間では， これらの 管理は 共通と なります。 混 よく， これらを 利用す る 
には， かなり、; 采く システムを 知る 必要が あるで しよう。 

③ スタック チェック オプションは 使用で き ません。 各 タスクに ワーク エリ アの 中に スタック 
が 用意され るからで す。 

R 型の モジュールを 作成す る 場合は， スタート アップと して SXLIB . L の 中の __ MAIN.O 
のか わり に __ MAINR . 〇をリ ンク して 使用し ます。 こう した 具体的な コンパイル/ リ ンクの 
方法は， 次の 項で 述べ る ことにします。 
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以」1 のように， G 言語に よる 開発には いろいろと 厄介な こと もあります。 G 吕 語て 開発を 
行う 場合， あらかじめ， こうした 事項を 頭に 入れて おいてく ださい。 それによ つて 得られる メ 
リットを 无坪 にかけ て， C 言語で 開発す るか， アセンブリ 言語に する か， 適当な 言語を 選択 
する 必要が あるで しよう。 
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14 


SXLIB. 


SXUB.L は， SX ァプリケーションを 作成す るた めに 必要な オブジェクトを 収めた ライブ 
ラリ ファイルです。 XC2 で SX ァプリケーションを 作成す る 場合は， この 中に 収められて 
いる 関数 等を 利用して SX-SYSTEM を 利用す る ことになります。 

f ] XC 2 の 出力す る 実行 ファイルの 構成 

ここで 少し， XC 2 の 出力す る コードの 内容に ついて 触れて おき ましよう。 C の ェキス パー 
卜 の 方は 飛ば してく ださって かまいません。 

コンパイ ラの 出力した 実行 ファイルには， プログラマが C 言語で 記述 した ものを ネイ ティ 
ブ コードに 変換した コードは もちろんで すが， そのほか にも コンパイ ラが 付加した コードが 含 
まれて います。 

1 つは， ライブラリから リンクした 関数の ルーチンです。 たとえば， プログラム 中で printf 
0 という 関数を 使用して いれば， コンパイラは printf 〇 を 実現す るた めの コードを 収め 
た オブジェクト， PRINTF .0 を CLIB . L の 中から 探し出して リンクして くれます。 

もう 1 つは， スタート アップと 呼ばれる， プログラムを 実行す る 準備を 整えて くれる コー 
ドです。 実行 ファイル カ ? 起動され る！:， まず， この コードが 実行され， 準備 力 整ったと ころで 
プログラマの 書いた main 〇 に 相当す る コードの 実行力 ? 始ま ります。 Human 上で 動作す る 
プログラムの 場合， CLIB . L の 中に 含まれる __ MAIN . O という オブジェクトが， これに あ 
た ります。 

Human の プログラムを f 专成 する 場合， これらの コードは CLIB . L という ライブラリ ファ 
イ ルに 収められた ものが 使われます。 CLIB . L は， XC 2 で 標準 的に 使われる 関数の オブジェ 
クトや スタート アップを 収めた ライブラリ ファイルな のです 0 ライブラリ ファイルと しては， 
CLIB.L の ほかに DOSLIB . L ， IOCSLIB . L , BASLIB . L , PLOATPNC . L , そし 
て FLOATEML . L などが 用意され ています が， それぞれ ファイル 名が 示して いるよう な 
コードを 含んで います。 必要が ある 場合， これらを リンクす るよう コン ハ °イ ラに す 旨 示して 使用 
します。 もちろん， ユーザが これら 以外の ライブラリを 用意して， リンクさせる こと も 可能で 
す 。 

以上の ような コードで 構成され る 実行 ファイルは， 一般的に 254： ページの 図 1 のよう に 構 
成されて います* 1 。 

*丨： あくまでも， 非常に 単純な C の ソースに， CUB.L のみ （あるいは， それに FLOAT???.L が 加わる 場 
合 も 含めて） を 非常に シン プルな 手順で リンクした 場合を 想定して います。 
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■図 1 XC2 の 生成し た 実行 ファ イ ルの 構成の 例 



プログラムの 先頭 

X ファイルと しての 
実行 開始 ア ドレス 


SXLIB . L の スター ト アップ 


CLIB.L が Human 上で 動作す る プログラム に 基本的な コード を 提供す るのと 同様に， 
SXLIB.L は SX アプリ ケー シ ョンの ための コードを 提供す る ライブラリです。 その 中には， 
SX アプリケーション 用の スタート アップ （SXLIB.L 中の— MAIN. 〇） や， SX コール 
を 呼び出す ための 膨大な 数の 関数の オブジェクト が 収め られ ています。 

SX アプリケーションを 作成す る 場合， XCS の コン ハ 0 イル ドライバ、* * 2 に， C 言語に よつ 
て 言 Sit された SX アプリ ケーシ ョンの ソースを コン ハ。 イ ルした f 麦， リ ンク 時には SXLIB.L 
を リンクし ろ， と 指^します。 たとえば， foo.c という ソースに SXLIB.L を リンクす る 場 
合は， 次のように コンパイラを 起動す る ことにな り ます。 


A>CC foo.c SXLIB.LM 


CLIB.L はつねに リンク される ことに なって いるので， とくに 指定し なくても， （この場合） 
SXLIB.L の 次に リンクされ ます。 このと き， SXLIB 丄の 中には SX アプリケーション 
用の スタート アップ _ MAIN. 〇 力' CLIB.L の 中には Humari 上の プログラム 用の スター 
ト アップ— MAIN. 〇 （同名です） が 含まれて いる わけです が， 先に SXLIB.L との リンク 
作業が 行われた 場合， SXLIB.L の 中に ある _ MAIN •〇が スタート アップと して リンク さ 
れる こと にな ります。 

*2: XCI の 場合， コンパイラは プリプロセッサ CPP . X , パー サ CC 0. X , コード ジェネレータ CCI . X , 才 
プ ティ マイ ザ CC 2. X というぐ あいに， 各部が 独立した 実行 ファイル となって おり， これらを コン 
パイル ドライバ CC . X が 呼び出して コンパイル 作業を 統括して いました。 XC 2 になって， これらは 
すべて 丨 つの 実行 ファイル CC . X に まとめられて しまい， 独立した 存在と しての コンパイル ドライ 
バ はなく なって しまいました。 ここでは， CC . X に 含まれる コンパイル ドライバ としての 機能を 指 
して， こう 呼ぶ ことにします。 
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SXLIB . L の 中の スター ト アップは， 起動され た プログラムが SX アプリ ケー ション とし 
て 動作で きる ように 準備を 行います。 その 内容は， 次の ような ものです。 

• モジュール ヘッダの 用意 

• コマンド ラインから 起動され た 場合の， 外部 カーネルの 呼び出し 

•ワーク エリア 内の 設定 （スタック， ヒープの 用意と， そのための コマンド ラインの 解析） 

• argc， argv の 作成 ' 

•スト リーム 入出力の ための 初期設定 これらは Human 上の プログラムの ための 

• 時間 関数の ための 初 溯 設定 スタート ア ップ とほ ぼ 同様 

• 乱数の 初期化 


このよう な 处:理 が' 行われた 後， argc , argv を スタックに 積んで， プログラマの 書いた main 
0 を 呼び出す わけです。 

これは， つまり， 本書で 示した アセンブラ 版の スケルトン SKELTON.S の 前半 部分， 74 
行までに 相当す る と 考えて よいで しよ う。 プログラマが C 言語で 記述す るのは， SKELTON.S 
の 74 行 以降と いう ことになります。 

SXLIB.L を リンクした 場合の 実行 ファイルは， 図 2 のよう な 構成と なり ます。 

■図 2 SXUB . L をリ ンク した 場合の 実行 ファイルの 構成の 例 


プロ グラマの 
書いた コード 


モジ ユール ヘッダ 


外部 力 ー ネル 
の 起動 


SX アプリケーション 
として 動作す る 準備 


リンク さ れた 
ライブラリ 


プログラムの 先頭 


— X ファイルと しての 実行 ア ドレス 

/ SX アプリ ケーシ ヨンと しての 実行 ア ドレス 
★スタート アップ 


main 〇 の 延理が 終了す ると， スタート アップに 处:理 が 戻って きます。 スター ト アップは 
残りの 处理， つまり $A352 TSExit を 呼び出す 処理を 実行して， プログラムを 終了 させ ま 
す 0 
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SXLIB.H の 中に 含まれる スタート アップは C 型の モジュール 用の スター ト アップです 0 
R 型の モ ジュール を 作成し たい 場合， この スタート アッ プの かわ りに 別フ アイ ルと して 提供 
されて いる MAINR.0 を リンクし なければ なりません。 そのためには， たとえば R 型の 
モジュール として 記述され た bar. c という ソースが あった 場合， 次のように コンパイラを 起 
動す る こ とに な ります。 


A>CC bar.c MAINR.0 SXLIB.LH 


SXLIB . L によって サボー トされる 関数 


DOS コールを 呼び出す 関数が DOSLIBX •の 中に 収められて います。 たとえば， MPU 
の 特権 状態を 切り替える ための DOS コール， $FF20 SUPER を 呼び出したい 場合， G の 
ソース 中で 関数 SUPER 〇 を 呼び出せば， コンパイル/リンク 時に， DOSLIB.L の 中の 
DOS 20.0 がリ ンク される ことにな り ます。 

これと 同様に， SX コール 1 つ 1 つに， それに 対応す る C の 関数が 用意され ています。 

たとえば， $A357 TSEventAvail に 対応す る 〇の 関数と しては， int TSEventAvail 
(int, tsevent*) が 用意され ています。 これは， SXLIB.L の 中では A357.0 という オブ 
ジヱ タトと して 登録され ています。 

このように， SX コールを 呼び出す 関数には， おおむね SX コール 名 そのままの 関数 名が 
与えられて います。 付録 デイ スク 「SXer Tool Box」 に 収められ ている SXLIB.L に 含 
まれる 関数の リ フ アレンスに ついては， やはり 付録 デイ スタの デイ レクト リ ¥C 開発 キット 
¥D0C 中の SXLIB.DOC の 一覧表を 参照して ください。 ここには， 各 関数の 引数と 返り 
値， そしてかん たんな 注意事項 など 力 5 1 己され ています。 それぞれの 機能に ついては 同名の SX 
コールの リ フ アレンスを 参, 照して く だ、 さい 0 


SX し 旧 .H 


実際に SXLIB.L を 利用す る 場合， ソースの 先頭で SXLIB.H を include する 必要が 
あります。 SXLIB.H では， SXLIB.L に 含まれる 関数の プロ ト タイプ 宣言 等を 行う ほか， 
構造体 や シンボル 類を 定義して いる SXDEF.H の include 等を 行って います。 
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C 言語で 記述す るから といって， SX アプリケーションの スタイルが 変わる わけでは ありま 
せん。 アセンブリ 言語で 記述して いたと きと 同様， 初期化して， イ ベン トを 待って， 各イべ 
ン トの 処理 ルーチンを 実行して， そして 指示が あったら 終了 処理を 行ろ， とい 5 ぐあいに， 
おな じみの 仕事を こ なす だけの 話です。 

なには ともあれ， C 言語 版の スケルトンを 見て ください （リスト 1)。 

■リスト 1 c 版 スケルトン 




h 

3 /% 

4 A 

5 

6 

7 

8 
9 

10 
11 
12 
13 


SX-WINDOW 
C 版 スケルトン 


If inc I ude 
Ifi nc I ude 
H i nc I ude 

Net i ne 
jtdef ine 
#def ine 


く STDIO . H > 
< STDLIB . H > 
く SXLIB . H > 


WINOPT 
WIN—X 
WIN— Y 


ObOOOO 
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128 


*/ 


/* ウィン ドウ オプション*/ 
h ウィンドウ 初期 x %/ 

A ウィンドウ 初期 y \/ 


14 

int 

1 d 1 eEvent ( void ) : 

15 

i nt 

Lef tDownEvent ( void ); 

16 

int 

Let tUpEvent ( void ) ; 

17 

int 

R i ghtDownEvent ( void ) : 

18 

int 

Ri ghtUpEvent ( void ) ; 

19 

int 

KeyDownEvent ( void ) : 

20 

int 

KeyllpEvent ( void ) : 

21 

int 

UpdateEvent ( void ) : 

22 

int 

Act i vateEvent ( void ) : 

23 

int 

Systeml 2 Event ( void ) ; 

24 

int 

1 n i t ( void ) ; 

25 

int 

DrawGraphl s t ( void ) ; 

26 

void 

DrawGraph ( void ) ; 

27 

void ' 

T i n i ( int ) ; 

28 



29 

A 

グローバル 変数 

30 



31 

rect 

winRect = i 0 , 0 , WIN 一 X , 

32 

int 

paramF 1 g = 0 ; 

33 

tsevent 

eventRec ; 

34 

int 

eventMask = Oxffff ; 

35 

int 

task 1 d ; 

36 

window 

♦winPtr = 0 ; 

37 

int 

winAct i ve = 0 ; 

38 



39 

h 

メイン 

40 

int 

ma i n () 

41 



42 


int status ; 

43 



44 


status = 1 n i t () ; 

45 


while ( status >= 0 ) { 

46 


TSEvent Ava i 1 ( ev 

47 


sw i tch ( eventRe 

48 


case E _ l DLE : 


*/ 

WIN_Y } : /* ウィンド ウレ ク タング ル */ 

A コマンド ラインの 解析 結果 */ 

/* イベント レコ ー ド */ 

/* イベント マスク */ 

/* タスク 丨 D %/ 

h ウィンドウ レコー ドへの ポインタ*/ 
アクティブ フラグ */ 


h 




% 


アプリ ケー シヨ ンの 初期化 %/ 
返り 値が 正の 数で ある 間 ループ*/ 


SeventRec ) : 

1 

h アイ ド ルイ ベン 


*/ 
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49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 

82 } 

83 

84 /\ 

85 int 

86 { 

87 

88 I 

89 

90 /% 

91 int 

92 { 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 

109 

110 
111 } 
112 


status = Idl e Event () ； 
break ; 

case E_MSLDOWN: /* レフ ト ダウン イベント 

status = LeftDown Event () ; 

break; •ノ、 _ 

case E_MSLUP: /* レフ ト アツ フイ ペン ト 

status = Let tUpEvent () ; 


break; 

case EJSROOWN: 
status = 
break; 

case EJSRUP: 
status = 
break; 

case EJEYDOWN: 
status = 
break ; 

case E—KEYUP: 
status = 
break ; 

case EJJPDATE: 
status = 


/* ライ ト タウン イ ベン 
R i ghtDownEvent () : 

/* ライ ト アップ イ ベン 
RightUpEvent 〇 ; 

/% キー ダウン イ ベン ト 
KeyDownEvent 〇 : 

/% キー アップ イベント 
KeyUpEvent 〇 : 

/% アップ デ ー トイ ベン 
UpdateEvent 〇 : 


break; 

case E_ACTIVATE: /% アク ティべ ー トイ ベン ト 

status = Act I vatetvent 〇 : 


break ; 

case E SYSTEM!: /% システム イベント 1 

case E=SYSTEM2: h システム イベント 2 

status = Systenil2Event 〇 : 
break ; 

Tini ( status) ; A アフリ ケーシ ヨンの 終了 処理 


%! 

*/ 

*/ 

♦/ 

*/ 

*/ 

*/ 

%! 

%! 


アイ ドル イベント 
Id I eEvent ( vo i d) 

return 0; 


*/ 

/% なにもし ない 本 / 


レフ ト ダウン イベント 
Let tDownEvent ( void) 




int 


part; 


/\ 自分の ウィンドウ 上で 発生した ？*/ 
if ( winPtr == ( window *) ( eventRec. whom) ) t , 

if (winActive == 0) /* イン ァ クー ァィ 7 ならば */ 

WMSelect ( winPtr) ; /* アク ティ ブ に */ 
else { 、 

part = SXCal IWindM( winPtr, &eventRec) ; 
switch ( part) { 

case WJNCLOSE:/* クローズ ボタンが 押された 、/ 

return -1 \/% 終了へ 本 / 

break; 

case WJNINSIDE:/* ウィンドウ コンテンツ 、/ 

/% なにもし ない 本 / 

break ; 

} 


return 0; 
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M3 /* レフ ト アップ イベント 

114 i n t LeftUpEvent ( void) 

115 { 

1 1 6 return 0 ; 


119 A ライ ト ダウン イベント 

120 i n t R i ghtDownEvent ( void) 

121 { 

122 return 0; 

123 ( 

124 

125 /% ライ ト アップ イベント 

126 i n t R i gh tUpEven t ( void) 

127 { 

128 return 0; 

129 | 

130 

131 /* キー ダウ ン イベント 

132 int KeyDownEvent ( void) 

133 ( 

134 return 0; 

135 \ 

136 

137/* キー アップ イベント 

138 int KeyUpEvent ( void} 

139 | 

140 return 0; 

141 \ 

142 

143/* アッ フデ ー ト イベント 

144 int UpdateEvent ( void) 

145 { 

146 WMUpdate( winPtr) : 

147 DrawGraph 〇 : 

148 WMUpdtOver ( winPtr) ; 

149 return 0; 

150 | 

151 

152 /% アク ティべ一 ト イベント 

153 int Act i vateEvent ( void) 

154 { 

155 if ( winPtr == ( window 

156 w i nAct i ve = I ; 

1 57 else 

158 w i nAct i ve = 0 ; 

159 return 0; 

160 } 

161 

162 /% システム イ ベン ト 1 , 2 

163 int System 12Event( void) 

164 { 

1 65 switch ( eventRec. what2) 

166 case ENDTSK: 

167 case CLOSEALL: 

168 return -1 ; 

169 break ; 

170 case Wl NDOWSELECT : 

171 WMSe I ect ( winPtr) 

172 ( 

173 return 0; 

174 } 

175 


*/ 

h なにもし ない 

M 

h なにもし ない %/ 

*/ 

h なにもし ない %i 

M 

/* なにもし ない */ 

*/ 

h なにもし ない %/ 

*/ 

A アップデート 開始 \j 

/* ウィンドウ 内部を 描画 */ 

A アップ デー ト 終了 */ 

*/ 

/% 自分の ウィン ドウが 
アク ティ ヷ に？ 

( eventRec. whom) ) 

/* アクティブ フラグを セット 

/* アクティブ フラグを リセット 

*/ 

h タスクの 終了 

/* 全 ウィンドウの クロー ズ 

/* 終了へ 

/* ウィン ドウの セ レクト 
/* ウィン ドウを セレ ク トする 


♦/ 

*/ 


*/ 

*/ 

*/ 

*/ 
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180 

181 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 
201 
202 } 

203 

204 A 

205 A 

206 int 

207 { 

208 

209 

210 
211 } 

212 

213 / ネ 

214 void 

215 { 

216 

217 

218 ( 

219 

220 A 

221 void 

222 { 

223 

224 

225 

226 } 


アプリ ケ ーショ ンの 初期化を 行なう 
I n i t ( void) 

task tbuff; 

TS6etTdb( &tbuff, -1) ; 


*/ 


h タスク 管理 テーブルを 

コピーして くる %1 


/% タスク 管理 テーブルを 

コ ピーす る */ 

paramFIg = TSTakeParam ( &tbuff. command, &winRect, 0, 0, 0, 0) ; 
if ( ( paramFIg & 1) == 0) { /* -W ^* フシ ヨンが 

指定され ていない 場合 

% (long *) (&winRect. left) = TSGetWi ndowPos 〇 ; 
winRect. right = wi nRect. left + WIN_X; 
winRect. bottom = winRect. top + WIN 一 Y; 


t/ 


taskld = TSGetIDO ; /* タスク ID を 得る 本 / 

/* ウィンドウを 關く */ 

winPtr = ( window *)WM0pen( ( window 〇 ( 0), 

/* ヒープ 上に 作成 */ 

&w i nRect, 

/% ウィンド ウレ ク タング ル */ 
( LASCII *) ( ， ’¥010NOTITLE"), 

/* ウィン ドウ タイトル %/ 
-1, h 可視 */ 

( 0x20 くく 4) + WIN0PT, 

h 標準 ウィンドウ */ 

( window t) ( - 1) , 

h もっとも 手前に */ 

-1, /% クロー ズ ボックス あり */ 

(I ong) ( taskld)); 

/* タスク 丨 D %/ 


if ( winPtr == 0) 

A 

エラー ? 


*/ 

return -1 ; 

h ならば 終了へ 


M 

return ( DrawGraphl st () ) 

; h 

ウィンドウの 内部を 描画す る 


ウィン ドウ 内部の 描画の 





準備を 行なう 関数 

*/ 




DrawGraphl s t ( void) 





6MSet6raph( ( graph t ) ( 

winPtr)) ;/* 

グラフ ポー トを セッ 

卜 

M 


h 

なにも しない 

*/ 


return 0; 





ウィンドウ 内部を 描画す る 関数 */ 




DrawGraph ( void) 





6MSet6raph( ( graph t ) ( 

winPtr)) : /* 

グラフ ポー トを セッ 

卜 



h 

なにも しない 

M 


終了 処理 

M 




T ini (int status) 





if ( winPtr != 0) 

h 

ウィン ドウが 開かれて いたら 

*/ 


<it( 0) 


WMD i spose ( winPtr) : 1% 廃棄す る 


*/ 


t n 
/i — 

co r — - 8 9 
I 7 7 1 
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SKELTON . C は， アセンブラ 版 スケル ト ン である SKELTON . S と BODY . S の 内容 
を， そのまま G に 置き換えた ものです。 機能的には ほとんど 同じで， ウィンドウを 1 つ 開い 
て， それが ドラッグ， クローズ できる という だけの 代物です。 です 力す， 必要な 骨格は 備えて い 
ますから， 肉付けす る ことによって 実用的な アプリケーションを 作成す る こ とが 可能です。 
この スケルトンを コン ハ。 イ ルして みま しよう。 

A>CC SKELTON.C SXLIB . L 13 


ヘッダ ファイルが 大きい ので， プログラムの サイズの わりには 時間が かかる と 思います。 

付録 デイ スタに 収めた ソースを コンパイルして みて エラーが 発生す るよう でしたら， ライブ 
ラリ や ヘッダ' フ ァイ ルの インスト ー ルに 問題が あ ると 思われます。 もう 一度 チェ ック してみ て 
〈ださい 。 

コンパイルの 結果， 正常に 実行 ファイル SKELTON . X が 作成され たら， コマンド ライン 
から， あるいは SX シェル 上から 実行して みて ください。 その 際， 「プロセス 情報」 を 走らせ 
て おくと， メモリ の 消費 ぐあいが'? 雀！ 忍で きます。 たった こ れだ けの プロ グラ ムで すが， 実行 ファ 
イ ルの サイズは 6 K バイ ト 強， 実行時には トータルで 140 K バイ ト ほどの メモリを 消費して 
しまいます。 
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C 言語 版の スケル トンを ベースと して 作成した サンプル プログラムを 示します。 サンプル プ 
ログ ラム CSAMPLE は， テキス ト エディツ トを 利用した， かんたんな エディタを 実現す 
る プログラムです。 


プログラムの 仕様 _ 

CSAMPLE . X を 起動す ると， スクロール バー 付きの 標準 ウインドウ （ウインドウ タイト 
ル’ Scratch ’） が^: され， 内部で カーソルが 点滅を 始めます （図 1)〇 


■図 1 CSAMPLE の 実行 例 



カーソルが 点滅して いるのは， ウインドウが アクティブな 場合です。 この 状態で キーボード 
から 文字を 入力す る ことができます。 ウインドウが イン アクティブの 場合は， カーソルは 点滅 
せず， 文字の 入力 もで きません。 

マウスの 左 ボタンに よって， ウインドウの ドラッグ， サイズ 変更， ズームイン/アウト 等を 
行う ことができます。 また， テキスト 内部で クリック/ドラッグ する ことにより， カーソルの 
移動/セレ ク ト範 固が^* 能です。 

マウスの 右 ボタンでは， テキス ト エディッ トの ポップアップ メニューが'^ され， デスク トッ 
プ スクラップと の 間で カット & ペースト が 可能です。 キーボード による ショート カットは サ 
ポ ー ト していません。 


ブロ グラムの 説明 


265 ページからの プログラムは， テキス ト エディッ トを 利用した エディタの 非常に プリ ミ 
ティブな モデルです。 文書を 編集す るた めの 必要 最低限の 機能は 有して います。 

65 行 目からは main 関数です。 行って いる ことは ほとんど スケルトンと 同じです が， 使用 
していない イベントへの 分岐は 省略して います。 

101 行 目からは アイ ドル イベントの 理を 行う 関数です。 ウィンドウが イン アクティブの 



5 サンプル プログラム 


場合は 何もし ません 0 アクティブの 場合は， まず スクロール バーを 操作 中 かどう かを 調べ， 左 
ボタンが 押され 続けて いるの ならば， スクロール 处理を 続けます 0 左 ボタンが 猶 されて いれば， 
ス クロ —ル バーの 处理を 終了 します。 

ス クロ ー ルバ ーの 处理を 行っ ていな L 、場合， 定期的に ス クロ —ル バーの 再 描画を 行います。 
本来なら ば， スクロール バーの 値が 前回 調べた ときから 変化した 場合に のみ 再 描画を 行えば よ 
いのです が， ここでは その 判断を 省略して います。 この 处理を 行わない 場合は ， TMEventW 
0 を 利用して カーソルの 点滅を 行います。 

1 找行 目からは レフト ダウン イベントの 処理 関数です 。 SXCallWindM () を 利用して 
分岐を 行う のは スケル トンと 同様で， サイ ズ ボタ ン 関係， ス クロ ー ルバ ー関 係， テキストの セレ 
ク ト 等に 関する 处理が 追加され ています。 テキストの セレ ク ト 理 は， 144 行の TMEventW 
0 を 呼び出す 1 行 だけで， 後は テキスト マネージャが 適当に 判断して 処理を 行って くれ ま 
す 。 

157 行 目からの ライ ト ダウン イベントの 処理 関数， 166 行 目の キー ダウン イベント 处理関 
数では， 実質的に TMEventW 〇 を 呼び出し ている だけです 0 ここで もやは り， テキスト 
マネージャの 判断に よって， これ だけで カッ ト & ペーストの 理が 行われて いる わけです。 

174 行からの アッ プデー トイ ベント で 注意 してい ただ きたいのは ，アッ プデー トを 行う 前 
に カーソルを 消して いる 点です （177 〜 178 行 目 )〇 力ー ソルを 消してから 書き換えを 行わな 
いと， それ 以降の カーソルの 描画が 正常に 行われない 場合が あるので， 必ず この 处理を 行うよ 
うにして ください* 1 。 

*丨： 前著 「 SX - WIND 0 W 〜 j でも テキス ト エディットを 使用した サンプル プログラムを 掲載し ましたが， 
ここでは 力ー ソルを 消して いないため， 力ー ソルの 描画が おかしく なる 場合が ありま した。 「 sx - 
WIND 0 W 〜 j の ブロ グラムを アセンブル/実行して， ほかの ウインドウを カーソルの 上に 重ねたり 
除いたり する ことで， この 問題を 確認す る ことができます。 

188 行 目からの アク テイべ ー トイ ベントの 処理 関数では， ウイン ドウが イ ン アクティブに 
なった 場合， カーソルを 点燈 させる 処理を 行って います。 同時に アクティブ フラグを OFF 
にして いますので、， アイドル イベント による カーソルの 点滅 处理は 行われず， 結果 的に カー ソ 
ルは 点燈 した まま の 状態 となります 0 

214 行 目からの Init 〇 は， アプリケーションの 初期化* を 行う 関数です。 スケルトンと あ 
まり 違いはありません が， ウインドウ オープン 後， サイズ ボタンを 使用す るた めに レコー ド 内 
の フラグを 操作して いる 点で 異なって います。 

244 行 目からの DrawGraphlst 〇 は ウインドウ 内部の 初期 描 風 あるいは そのための 
諸 設定を 行う 関数です 0 ここで 行って いるのは， おもに テキスト エディットと スクロール バー 
の オープン， そして， それらの 最初の 描画です。 テキス ト エディッ トの オープン 時に キャッシュ 
を ON にして います （253 行 目)。 これは SX 1.10 からの 機能です が， キャッシュを ON 
にしなかった 場合との スピードの 差は 歴然として います。 この 行 （と 次の 行） を 注釈に して 確 
かめて みる こ とを おすすめして おきます。 
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273 行 目からの DrawGraph 0 は， この プログラムでは アップデート 時の 描画を 行うた 
めだけ の 存在と なって しまいました。 行って いる ことは 単純で， TMUpDate 3 () を 呼んで 
テキスト エディット 部分を， GMDraw 〇 で スクロール バーを それぞれ 再 描画して， その後 
サイズ ボタンを 描画して います。 

282 行 目からは 終了 理を 行う 関数です。 テキスト エディットと スクロール バー， ウィン 
ドウの 廃棄を 行って exit 〇 しています。 

これ 以降には ウィンドウ 内部の 座標の 处理 等を 行う 閨 数が 置かれて います。 計算が 多く， 一 
見す ると， かなり ややこしく 思える かもしれ ません が， どちら かとい うと， 上 tt 交 的 単 ^6 な 言十算 
を 数多く こなす という， 退屈な 处理 といえる かもしれ ません。 とくに， ビュー レク タング' ル 等 
の 大きさを ウィンドウ コンテンツの 大きさに あわせて 設定す る SetTextRect 〇 (294 行 
目〜)， スクロール バーの 大きさを ウインドウに あわせて 計算し 直す SetScBRect 〇 (304 
行 目〜)， 現在の ビュー レク タング ルと テキスト 全体の 位置 関係を 計算し， スクロール バーの 
値と して 設定す る SetScBValue (317 行 目〜） などは， 非常によ く 使われる 関数です から， 
毎回 書き おろす よりは ライブラリ 的に 使い 回した ほう が 楽です。 

341 行 目 以降の UpdateText 〇， ScrollText 〇 の S つの 関数は， その 前の 計算 主体 
の 関数を 利用して 目に 見える 处理 を 行います。 前者は， ウィンドウの 大きさを もとに 言十算 した 
各種の 値から テキス ト エディッ ト や スクロール バーの 大きさな どを 求め， 実際に 再 描画す る 関 
数〇後 者は， マウスの 押されて いる ポイントから， スクロール バーの 处理を 行って 再 描画す る 
(UpdateText 〇 利用） 関数です 0 

この プログラムには， じつは 問題が あります。 スクロール バーの 取りうる 値は- 32768 〜 
32767, 実際には 最小値 0 と して 使われる ことが 多い ので， 0^32767 という ところです。 
この 値 1 に対して， 画面 上の 1 ドットが 相当して います。 では， 縦 方向に 32767 ドット 以 
上 （6 X 1£ ドット フォント ならば 約 2730 行） の サイズを もつ テキストを 扱いたい 場合は ど 
う したら よいので しよ うか？* 2 これは 各自で 考えて みて ください。 

*2: もっとも， この プログラムでは テキス ト エディッ トを 開く 際に 最大 バイ ト 数を 64K バイ トに 限定 
している ので， 2730 行 もの テキス ト を 扱える かどう かは 怪しい ところです。 


プログラム リス ト 


リスト 1 に CSAMPLE.G を 示します。 これを コンパイル する 場合は， 


A>CC CSAMPLE.C SXLIB . L 3 

のよう に 行います。 
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■リスト 1 CSAMPLE.C 


2 

.* SX-WIN00W 


*/ 

3 

'* CSAMPLE.C 


*/ 

4 

t 


♦/ 

5 

c 吾に よる サンプル 

%/ 

6 

7 

8 
9 

■ * 

J include く STDIO. H> 

< include く STDLIB. H> 


*/ 

10 

II 

include <SXLI8. H> 



12 

含 define WINOPT 

WC SCROLL 

1 WC.6B0X 

13 

define WIN X 

256 


14 

15 

We fine WIN~Y 
define FONTS IZE 

256 


16 

define LINEMAX 

128 


17 

define SCROLL INTERVAL 

20 


18 

define CACHESIZE 

4096 



2 〇 typede t struct 

21 short 

22 short 

23 short 
Z4 } sc3Val: 

25 


I 

min ; 
max; 
value; 


h ウィン ドウ オプシ 3 ン* / 

/* ウィンドウ 初期 x ♦/ 

/* ウィンドウ 初期 y x/ 

/* フォントの x 方向の サイ ズ 拿/ 
/* 1 行に 入る 文字 数 x / 

/» 又ク 〇-ル ハ-を 再 描画す る 間隔*/ 
I 、 キ V ッシ: l サイズ*/ 


/* スク 0- ル A ’ - の 値を 表現す る 型 


26 mt 

27 int 

28 int 

29 mt 

30 int 

31 int 

32 int 

33 int 

34 int 

35 int 

36 int 

37 int 

38 void 

39 void 

40 void 

41 void 

42 void 

43 void 

44 void 

45 

46 /* 

47 

48 rect 

49 int 


I dl eEvent ( void) : 

Lef tOownEvent ( void) : 

Lef tUpEvent ( void) ; 

RightOownEvent ( void) : 

Ri ghtUpEvent ( void) : 

KeyOownEvent ( void) : 

KeyUptvent ( void) : 

Upda teEvent ( void): 

Act i vateEvent ( void); 

Systeml2Event ( void) : 

I n 1 1 ( void) ; 

OrawGraohlst ( void) : 

Or.iwGraph ( void) : 

Tim ( int) : 

SetTextRect ( void) : 

SetScflRect ( void) : 

SetScBVal ue ( void) : 

Updarefext ( int); 

Scrol I Text ( po int_t. unsigned long): 


グ □ー バル 変数 


*/ 


winftect = 
paramF 1 9 


50 tsevent eventRec 


51 

52 int 

53 window 

54 int 

55 tEdi t 

56 rect 

57 control 

58 control 

59 rect 

60 scBVal 

61 int 

62 int 
53 

64 /* 

65 int 

66 < 

67 

68 
69 
7D 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
31 
92 

83 

84 

85 

86 
87 


Oxffff; 


eventMask = 
task I d ; 
twinPtr = 0; 
winActive 3 0; 
“tEHdl * 0: 
viewRect. destRact; 
“scBHHdl * 0: 
“scBVHdl = 0: 
scBHRect. scBVRact; 
scBHVal, scBVVal : 
scrol IContinua = 0; 
i as tT tme 3 0 ： 

メイン 
main () 


0. 0. WIN_X, WIN Y } : /* ウィンド ウレ ク タング ル 
; /X コマンド ラインの 解析 結果 

/* イベント レコード 
I 、 イベント マスク 
/X タスク 丨 D 


♦/ 

♦/ 

»/ 

M 

1/ 


/% ウィンドウ レコードへの ポインタ 拿 / 

/* アクティブ フラグ 》/ 

/ 、 テキスト エディット レコードへの ハンドル */ 
1% テキス ト エディ ッ トの レク タング ル */ 

/* スクロール バー 撗 への ハンドル */ 

/* スク □ ー ルバ ー琅 への ハンドル 》/ 

/* スク □ ー ルバ ー璇播 のレク タング ル */ 

/* スクロール バー 琎撗の 値 》/ 

/、 スク 〇 — ル 进枝中 フラグ */ 

h スク a — ルバー最終 再 描画 時刻 */ 


int status : 

status = I n i t () ： !\ アプリケーションの 初期化 %/ 

while 丨 status >= 0) { /t 返り 値が 正の 数で ある 間 ループ 

TSEventAva i I ( evsntMask. SieventRec) : 
swi tch ( eventRec. what) { 


/* アイ ド ルイ ベン f 
I dl eEvent 0 : 


_I0LE: 
status 
break : 

case E.MSLOOWN: /* レフ ト ダウン イベント 

status = Let tOownEvent () : 
break : 

case E.MSROOWN: /% ライ ト ダウン イベント 

status 3 RightDownEvent () ; 
break : 

case E.KEYDOWN: /* キー ダウン イベント 

status 3 KeyOownEvent 0 : 
break ： 

case E.UPOATE: /* アップデート イベント 

status = UpdatsEvent 〇 : 
break; 
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case E ACTIVATE: /* アク ティべ 一 ト イベント 

status s Act i vatetvent 0 : 
break : 

case E SYSTEM!: /» システム イ ベン ['上 

case £jYSTEM2 ： /» システム イベント 2 

status = Sys tsml 2E»ent 0 : 


%/ 

M 


break : 


Tini ( status) ; 


アイ ドル イベント 
I d I eEvent ( vo i d) 


/♦ その他の イベントは 省略 
/% アプリ ケー シ 3 ンの 終了 処理 


*/ 


i.nActive) < I 、 ウィンドウは アクティブ？ " 

GMSatGraphJ ( graph 〇 ( winPtr)) : 
if ( scrol IContinue) /♦ スク 〇 - 糾 - 裡 任 ？. 

if ( EMLBttnO) 1 /* 左 ホ タンは 押 cr H て、 るて 

if ( yvmPtr ( window t) ( eventRec. whom) ) 0 \ \ 

Scrol I Tax t ( ( point t) ( GMGI obal ToLocal ( * ( pomt.t ») ( iewentRac. whoraZ))) 
t ( unsigned long t) ( Seven tRec. what2)) ; 

^ scrol IContinue » 0; /* スクロール 中止 ♦/ 

else if ( { lastTime 4 - SCROLLINTERVAL) く 8v»ruRec. when 1 

UodatflText( 0) ; /t 定期的に スク 〇 _ 鮪-を 再 描画 、l 

lastTime = awentRec. when 


il se 


/» キ ャレツ トを プリ ンク 
TMEventW( tEHdl. ( ev#nt 0 ( EventRec)) : 


♦/ 


return 0; 


レフト ダウン イベント 、1 

Let tOownEvent ( void) 

，nt Part： A 自分の ウィンドウ 上で 発生した？ 

if ( winPtr 33 ( window *) ( eventRec. whom) ) I . 

if (wmActive ==0) / ♦ イン アク アィ "^ な 1 ? と 

vVMSel ect ( winPtr) ; /* アク ティ フに 

else { 

part = SXCal IWindM( winPtr. SeventRec) : 
swi tch ( part) { 


M 


case 

case 

case 


W.INCLOSE: 
return -I : 
break : 

W INGROW: 
W'INZMOUT: 
W INZMIN: 


/» クロー ズ ボタ ンか 押された 
/* 終了へ 


»/ 

*/ 


/% サイズ ボタン か 押された 
/» ズーム アウト した v 

n /» ズームインした . 

UpdateTaxt( I) : /* テキストと 功 〇 _ 阽 - を杳 き 直 す */ 

W ININSI0E: /* ウィンドウ コンテンツ ♦/ 

it ( GMPtlnRect ( iwiewHect. „ ゥ 、、い 

GMGIobalToLocal ( M point t *) [ ieventRec. whomZ)))) 

/X ビ : l ーレク タング ル 中？ 》/ 

TMEventW( tEHdl. ( event *) ( ieventRec) ) : 

/% セレ ク ト 処理 等 */ 、 ， ， „ , 

8 | S0 ScrollText( ( point.t) l GMGIobalToLocal ( *( point.t ») ( ieventRec. whomZ),). 
• ( unsigned long t) ( ieventRec. what2 ) ) ； 

/% スク O-iVA -の 処理 》/ 

break ： 


return 0; 


ライ ト ダウン イベント 
R i ghtOownEvsnt ( void) 


»/ 


/» 自分の ウィンドウ 上で 発生した？ 聿 / 

if ( winPtr 3S ( window t) ( eventRec. whom) ) 

TMEventW( tEHdl. ( event ») ( ieventRec )) ： 

/* メニ エーに よる カット & ペースト 処理 拿 / 

return 0 ： 


キー ダウン イベント 
KeyOownEvent ( void) 


TMEventW( tEHdl. 
return 0; 


event t) ( ieventRec) ) ; 

I 、 文 T 入力 


アップデート イベント */ 

UpdateEvent ( void) ，ふ « 

/x 自分の ウィンドウ 上で 発生した？ 
if ( winPtr == ( window t) ( eventRec. whom) ) { 

GMSetGraph( ( graph ») ( winPtr) ) : 
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TMCarat( tEHdl. Q) ; 

WMUpdate ( winPtr) : 
OrawGraph () ; 
WMUpdtOver ( «rinPtr) : 


/* キヤ レット を 消す 


XI 

♦/ 


I 、 アップデート 開始 

h ウィン ドウ 内部を 描画 ヴ 
/、 アップ デ ー ト 終了 拿 / 


rerurn 〇： 


アク ティべ 一 ト イベント %， 

Act I va teEvent ( void) 

/* 自分の ウィンドウ か • アクティブに？ */ 

inPtr =* ( window t) ( eventRec. whom) ) 


if ( 

else 


育 inAc t i 

winActive = 9 ： 
TMCaret ( tEHdl. I); 


/、 アクティブ フラグを セット 

h アクティブ フラグを リセット 
h キ ケレッ ト を点埴 する 


*/ 


♦/ 

%/ 


return 0; 


システム イ ベン ト〗. 2 

Systeml2Evenr ( void) 

switch ( svantRec. what2) 
case ENOTSK: 
case CLOSEALL: 
return -I : 
brsak : 

case WINOOWSELECT: 

1 WMSe I ect ( winPtr) ; 

return 0: 


/* タスクの 終了 

f 、 全 ウィン ドウの ク □—ズ 

/* 柊 了へ 

I 、 ウィン ドウの セレクト 
/* ウィン ドウを せ レク ト する 


»/ 

»/ 

*/ 

、/ 

*/ 


アプリ ケー シヨ ンの 初期化を 行なう 
task tbuff: 


/♦ タスク 管理 テーブルを コビーして くる 


♦/ 


TSGetrdbl itbuff. -1) : /» タスク 菅理 テーブルを コビーす る */ 

oaramFIg » TSTakeParam ( itbuff. command. iwinRecr. 0. 0. 0. 0) : 

if ( ( paramFIg S I) == 0) { /t オプションが 指定され ていない 場合 */ 

♦ (long *) (Jwi nRect. left) = TSGe tWi ndowpos () : 
winRact. right = winRect. left + '<VIN_X; 
vnnflect. bottom 3 winRect. top f WIN_Y: 

taskld = TSGetlOO : /» タスク ID を 得る ，/ 

/* ウィンドウを 開く X/ 

winPtr 3 ( window り WM0pen( { window t) ( 0). /% ヒープ 上に 作成 */ 

(winRect. /* ウィンド ウレ ク タング ルヴ 

( LASCII *) ( '«07Scratch'), /* ウィン ドウ タイトル 
-I. /* 可視 t/ 

( 0x20 <く 4) 卜 WINOPT. /X 摞 準ウィ ン ドウ t/ 

( window *) ( -I). /* もっとも 手前に */ 

-I. /* ク 〇 — ズ ボックス あり */ 

( long) ( taskld)) : /♦ タスク I D »/ 

if { winPtr »» 0) /* エラー？ 》/ 

raturn -I: /% ならば 終了へ 拿 / 


winPtr->wOpt i on 1= WC_GB0X0N ; 
return ( OrawGraphlst 0) ; 


/X サイズ ボタン 使用 、/ 

/* ウィンドウの 内部を 描画す る */ 


ウィンドウ 内部の 描画の 、1 

这调を 行なう 閒歆 ♦/ 

OrawGraphlst ( void) 

GMSetGrapht ! graph t) ( winPtr) ) : 


/» グラフ ポー トを セット 
/» テキス トの レ クタ ンゲ IV を 設定 


*/ 

%/ 


SetTextRect () : 

GMFontModa (0) : 

if ( FMOoenl 65536. idestRecr. 0. 12. &t£Hdl) != 0 ) 
return -I : 

{ MtEHdl). drawMode => 01100001 1 : /* 改行 コードと EOF を 表示 

if { TMCacheONI tEHdl. CACHESIZE) < 0) キヤ ツシ i o r» 
return -1 ; 

TMSetRect ( tEHdl. idastRect. iviawRect) : /* テ ‘ ィス ティ ネ - シ J ン /t レク タング ルを 設定 */ 
SetScBRect () : /» スク 〇 -fi ハ - の !/ ク タンク • ル を 計算 */ 

SetScBValue 〇 : /* スク 〇 - 糾 - の 最大 / 最小 / 現在 値を 計算 " 

if ( ( scBHHdl = CM0pen( winPtr. iscBHRect, (LASCII *)(”）. -I. 

scBHVal. value. scBHVal. min. scBHVal. max. 

Cl SCL3RWH « 4. 0)) « 0) 

' /» スク 0-iWV- ( 撗） を オープン 

return -I ; • 

i t ( ( scBVHdl = CMOpen ( winPtr. JscBVRect. (LASCII *) {*’）• -I. 

scBVVal. value. scBVVal. mm. scBVVal.max. 

Cl SCLBRWV <く 4. 0)) == 0> 

■ /» X ク 0-iW 、 - ( 琎） を オープン 

return -I : 


%/ 

、! 


\/ 


t/ 
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268 

269 

270 } 

271 

272 /* 

273 void 

274 I 

275 

276 

277 

278 

279 } 

280 

281 ハ 
282 void 
233 { 

284 

285 

286 

287 

288 

289 

290 
29! } 

292 

293 /* 

294 void 

295 I 

296 

297 

298 

299 

300 

301 I 

302 

303 /♦ 

304 void 

305 [ 

306 

307 

308 

309 


/* 

void 


320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 \ 

336 

337 

338 A 

339 /* 

340 A 

341 void 

342 { 

343 

344 

345 

346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 


UpdateTsxt ( I) : 
return 0: 


ウィン ドウ 内部を 描画す る閬 » */ 

OrawGraph ( void) 


/X いろいろ 描画 


GMSetGraph( ( graph ») ( winPtr)) :/ ♦ グラフ L ポノ 卜气 $ 卜に 
TMUp0ate3( tEHdl. ivtewRect) : /» テキスト f 乙 Z フ 37 "一 卜 


CMDraw ( winPtr) : 
WMDrawGBox ( winPtr ) ； 


終了 処理 

Tini ( int status) 

if ( tEHdl != 0) 

TMOi spose ( tEHdl) : 
if ( winPtr !» 0) I 

CMK 1 1 1 ( winPtr) ; 
WMOispose ( winPtr) : 

\ 

exit( 0) : 


/» X ク 0-*A. -を 描画 
/» サイズ ボタンを 描画 


\/ 


M 

M 

*/ 

♦/ 


/♦ f ネスト I テ • <7 卜が 開かれて いたら 
/I 廃棄す る | • % 

/ X ウィンドウが 開かれて いたり ♦/ 

/% コン トール 類を 廃棄 ♦/ 

A ウィン ドウを 廃棄 ♦/ 


テ千ス ト エディ 
SatTextRect ( v 


ソ トの レク タング ルを 計算す る 関数 
id) 


destRect. left s viewRact. left 3 w inPtr->»Graph. grRect. I ef t + I 
destRect. top s v i ewRect. top 3 winPtr->w6raph. grRect. top: 
destRect. right * LINEMAX » FONTSIZE ； 

v i ewRect. right 3 winPtr->wGraph. grRect. r ight - 18; 
destRect. bottom 3 w i ewRect. bottom 


wmPtr->w6raph. grRect. bottom - 18; 


スク □ー ルバ ーの レ クタ ン グルを I 十算す る 間 致 
SatScBRect ! void) 


scBHRect. 

scBHRect. 

scBHRect. 

scBHRect. 

scBVRect. 

scBVRect. 

scBVRect. 

scBVRect. 


left =« winPtr->w6raph. grRect. left; 

top 3 winPtr->w6raph. grRect. bottom - 13. 

right s winPtr->*Graph. grRect. r i ght - 18 ； 

bottom s w i nP t r->w6raph. grRect. bottom; 
left 3 winPtr->wGraph. jrRect. right - 18 ； 
top 3 winPtr->w6raph. grRect. top; 
right 3 w i nP t r->w6r aph. grRect. ri 9 ht; 
bottom s winPtr->wGraph. grRect. bottom - 18. 


スク □ー ルバ ーの 値を 計算す る閒 54 % f 

SetScBVal ua ( void) 

int xdots. ydots : 

int i : 

xdots * ( MtEHdD.dest.nght - ( MtEHdl) . dest I at t ; 

if ( xdots < ( i = ( MtEHdl). view, right - ( MtEHdl) . of fsetH) ) 

ydots = ( MtEHdl). nlines » ( MtEHdl) . I ineHeight; 
if ( ydots < ( i * ( MtEHdl). view, bottom - ( MtEHdl). offsetV)) 
ydots * i ； 


scBHVal. nin > 0; 

scBHVal.max = xdots - ( ( MtEHdl) . view, right - 
scBHVal. value » ( MtEHdl) . dest. left - ( MtEHdl) . of fsetH 
scBVVal. min = 0: 

scBVVal.max 3 ydots - ( ( MtEHdl) . view, bottom 
scBVVal. valua = ( "tEHdl) . dest. top - ( MtEHdl) . of fsetV; 


MtEHdl) . view, left) : 


MtEHdl). view, top) : 


テキスト エディットの レク タング ル、 および 皋〈 

スク a — ルバ ーの 位 3 などを 更? 斤す る閬歆 、！ 

sw == 0 スク a-/W\ - か移勒 しなかった 場合 

い 〇スク 0 -JWV - が 移 勅した 場合 、1 

UpdateText ( int sw) 


TMHida( tEHdl) : 

SetTextRect 〇 : 

TMSetView( tEHdl. &vi ewRect) : 
TMShow ( tEHdl) : 


/% テキス トを 不可視に 》/ 

/% テキス トの レク タング ルを 計算*/ 
/» ビュー レク タング ルを 設定 、1 

/\ テキス トを 可視に 拿/ 


/* X ， D-1WV -の 値を 計算 
scBHVal. min) ; /# 通 小 任を IS 定 
scBVVal. min) : 

scBHVal. max) : /♦ 通 大锂を IS 定 
scBVVal. max) : _ 

: /» 現在 値を 設定 


SetScBValue 0 : 

CMMinSat ( scBHHdl. 

Cr.MmSst ( sc8VHdl. 

CMMaxSet ( scBHHdl. 

CMMaxSet ( scBVHdi. ito > « < 1 1 . , 

CMValusSet ( scBHHdl. sc3HVal. valua) : 

CMValueSet ( scBVHdi. scBVVal. value) : 

SerScBRect () : / ♦ スク - の 位 3 令 計算 

CMHide ( scBHHdl) : /♦ X ク 〇 - 抓’ - を 不可視に 


*/ 

%/ 


•/ 

♦/ 


♦/ 

»/ 
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379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 

394 
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CMHidei scBVHdl) : 

CMMove( scBHHdl. *( point_t 0 ( &scBHRect)) : /% 位 3 を 設定 %/ 

CMMovs ( scBVHdl. ♦ ( point_t 0 ( &scBVRect) ) : 

h サイズを 設定 

CMSize( scBHHdl. ( ( scBHRect. right - scBHRect. left) « 16) t 18) : 
CMS け e( scBVHdl. { (18 « 16 ) + ( scSVRect. bottom - scBVRect top))) - 
CMShow( scBHHdl); /* スク O-A/V - を 可視に */ • ’ 

CMShow ( scBVHdl) : 

'.^OrawGBoxf winPtr) : /* サイズ ポタンを 描画 》/ 

SXVal idScBar ( wmPtr) : /* スク 0 -/W 、 ’ - を 7 , フ • テ ’- トリ - シ ’ j ン から 除く »/ 


コント □ ー ルの 操作に 従って テキス トを スクロール */ 

し、 スク □ ー ルバ ーの 位 a などを 更新す る閲数 */ 
icrol I Text ( po i nt_t I ocalPt. unsigned long shiftbit) 

int part : 

int destOfs [2] : 

int dir = 1 ; 

control Itctr IHdl ; 

GMSetGrapM ( graph M ( winPtr) ) : 

TMGatOestOffset ( tEHdl. destOfs) : /* f. イス テ イネ - シ j ンレク タンク • ル の ♦/ 

/* オフセットを 取得 %/ 

part = CMFmd ( localPt. winPtr. JctrlHdl) : /< 押された コン ト ロールを 調べる 拿 / 
if ( ( part « C_INUP) II ( part « C.INPGUP)) 

dir = -I; /* マイナス 方向への スクロール %/ 

switch ( part) { 

case CJNUP: /» アップ ボタン 

case C I NOOWN: /% ダウン ボタン 拿 / 

if ( ( shiftbit & EHM SHFT) « 0) { /* シフトが 押されて いない */ 

if ( ctrlHdl « scBHHdl) 

destOfs [ 0] i- ( FONTSIZE » 8 * dir) ; 

else 

destOfs ( I] ( FONTSIZE » 2 * dir) ; 

break ; 

} / 丨 シフ トが 押されて いる 場合 次へ 》/ 

case CJNPGUP: I 、 ページ アップ 拿 / 

case C INPG00WN: /♦ ページ ダウン */ 

if ( ctrlHdl == scBHHdl} 

destOfs [ 0] + s ( ( MtEHdl ) . vi ew. r i ght - ( MtEHdl). view, left) * dir; 

else 

destOfs [ I] +* ( ( »*tEHdl). view, right - ( UtEHdl). view, left) I dir; 

break : 

case C INTHUMB: /* サム 》/ 

CMCheck ( ctrlHdl. localPt. 0) : 
if ( ctrlHdl scBHHdl) 

destOfs [ 0] 3 CMVal ueGat ( ctrlHdl) : 

else 

destOfs [ 11 = CMValueGet( ctrlHdl) : 

break : 

default: /* それ 以外なら ば 、l 

part = 0 ; h パートコー ドを 0 に */ 

if ( part !- 0) \ /♦ スク 〇 -WV - か 操作され た 場合 */ 

TMUp0ateExist( tEHdl. I) ; /» 未 アップデート 部を 描画して 》/ 

TMSetOestOffset( tEHdl. destOfs [ 0]. destOfs [ ll) : 

\ /% テ • < ス ティ ネ - シ i ル パンク 1 の オフせ 7 卜を 設定 */ 

scrol i Continue - part: /* !*0 ならば スク □ー ル 中 Q 


COLUMN | GCC による 開発 

本文では XC 2 によ る 開発に ついて 述べ ま したが， 現在 X 68000 で 広く 使用され ている C 
言語 処理 系と して ， GNU C コンパイラ （ GCC ) についても 触れて おかなければ ならないで 
しょう。 

GCC による SX アプリ ケー シヨ ンの 開発に ついて 述べる 前に， GCC そのもの について 少 
し 解説して おき ましょう。 

GGG は， リチャード •ス トールマン 氏を 中心とする フリー ソフ ト ウェア フ アウン デ ー シヨ 
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ン （ FSF ) によって， GNU プロジェクトの 一環と して 開発され た c 言語 处理 系です 。 FSF 
という 団体は， ソフトウェアは 人類の 共有の 資産で ある ことを 主張し， 著作権に よる 独占に 
反対して います。 FSF のソフ トウ ェアは 「 Copyleft 」 とい う 権利に よ って 守られて おり， こ 
れらの ソフト ウェアを 自由に 流通させる こと を 阻む ことは 固く 禁止され ています。 原則と し 
て， 欲しい 人には 無料で 配布され なければ ならず， また 実行 コード ばかりでなく， ソースを 
求める 人に も 必ず 配布され なければ なり ません。 

GNU プロジェクト というのは， 0 S を はじめと する 環境の すべてを フリーで 提供し ようと 
いう もので， GCCJ は そのための 基本的な 開発 言語です。 もちろん， その ソース も 無料で 流通 
している ので， UNIX 系の ワークステーションは もちろん， さまざまな パソコン にも， 世界 
各国の 有志の 手に よ って 移植 さ れ てい ます* 1 。 

X 68000 版の GCC も， こうした 流れの 1 つと して 存在す る ものです。 複数の 方が 移植を 
手がけられた ことから， X 68000 版と ひと 口に いっても， いくつかの 分派が 存在す るので す 
が， ここでは 現在のところ， もっとも 広く 使われて いると 考えられる 「真 里子 版* 2 」 を 想定 
して 話を 進める ことにします。 

X 68000 版 GCC の 特徴は， 

1) 非常に 強力な 最適化が 行われる こと 

Z ) 文法は ANSI に 完全 対応して いるが， GCC 独自の 拡張 も 行われて いる こと 

3) XC (1, Z ) の ライブラリが 使用で きる こと* 3 

といった 点に あります。 これは すなわち， XC 2 用に 書いた ソースが そのまま 通る （ただし， 
XC 2 の 文法 チヱ ックの 網の 目を す り 抜けた エラーは 修正す る 必要が あ ります が） こと， 
SXLIB . L も XC 2 同様に 利用で きる こと， そして， X 〇 2 よりも 効率の よい コードが 得られ 
る こと を 意味して います。 

このため， 本書に 掲載した C 版 スケルトン， C 版の サンプル プログラムを GCC で コンパ 
イ ルし， 実行 ファイルを 作成す る ことは もちろん， SX - WINDOW 上での 実行に ついても X 〇 
Z と 同様に 行う こ とがで きます。 

4 章で 掲載した サンプル プログラム， CSAMPLE . C を コンパイル する 場合は， 次の よう 
に GCC を 起動し ます。 


A>gcc CSAMPLE.C SXLIB.L F LOATFNC.l H 


最後に FLOATFNG . L を リンクす るよ う 指定して いますが， これは XCS では 自動的に リ 
ンク されて いた も のを 明示した にす ぎ ません。 FLOATFNC . L は 浮動小数点 演算を 行うた め 
の ライブラリで， XC 2 に 添付され ている ものです。 

XC 2 用 に 記述 した ソースを GCC でコ ン パイ ルさせる だけでは 宝の 持ちぐ さ れ ですから， 
GCC らしい， エレガントな 記述で SX アプリケーションを 書く ことができ るよう， 努力して 
みて く ださい。 

忘れて はならない のは， 適切な 最適化 オプ シヨ ンを コマンド ライ ンで 指定して こそ GCC 
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の 最適化の 威力が 真に 発揮され る， という ことです。 GCC には多くの最適化オプションが用 
意され ており， コンパイル する プログラムの 性格に よって， 適用す る 最適化 処理を ューザが 
選ん で1 ■旨定 す るよう になって います。 付属の， ま たは 別 配布の ドキュメント や マニュアルを 
よく 読んで， GCC の パワーを フルに 引き出し てく ださい。 

真 里子 版 GCC の 最新の 動向 としては， SX - GCC と 呼ばれる 処理 系が で きつつ あります。 
グローバル 変数な どを ワーク エリ アに 置く などの 工夫に よって， 効率よ く メモリが 使える ， SX 
アプリケーション 開発 用の コンパイラです。 この 原稿 執筆 時点 （’ 91 年 11 月） では プロ トタ 
イ プ 版が 公開 されて いるの みです が， 一日 も 早い 完成を 願いたい ものです* 4 。 

*丨： ただし， マッキントッシュに 移植す る ことは 禁止され ています。 なにやら 「 Copyleft 」 を 旨と す 
る FSF の 姿勢と 相容れな いものが あ るの だそう で …… 。 

*2: 真 里子 版 GCC は， 真 里子 氏 （ハンドル 名） の 手に よって X 68000 上に 移植され， 現在 も バージ ョ 
ン アップが 続けられて います 。 NIFTY Serve 内の SHARP フォーラム （ FSHARP ) で 配布を 受ける 
ことができ ます。 

*3: 現在のところ， GCC 用の ライブラリは 存在 しないので， XCI , あるいは XC 2 の ライブラリを 使用 
する 「必要が ある」 というの が 正しい 表現です。 GCC 自体は 無料です が， 実用に 供す るた めには 
XCI , あるいは XC 2 を 購入す る 必要が あります。 

*4: このように， フリー ソフ ト ウェアの 作者/移植 者に バージョンアップを 強要す る ことは マナー 違 
反です から， 真似を しては いけません。 


COLUMN | ライブ ラ リの アセンブラからの 使用 

C 言語で 使用す る こ とを 目的と して 用意され ている SXLIB . L では あり ますが， 中には ア 
セン プリ 言語で 記述した プログラムから も 利用した くなる よう な 便利な もの も 含まれて いま 
す。 こういった 便利な ものは アセンブリ 言語の プログラムから も 利用 させても らい ま しよう。 
例と して， テキス ト マネージャの TMEventW を 利用す る こ とを 考えて みます 0 
5 章の リファレンスの 中では， TMEventW を 呼び出す 手順が， 次のように 示されて いま 
す 。 

[コール] 


pea 

eventRec 

pea 

tEHdl 

jsr 

_TMEventW 

addq.l 

#8 ,sp 


要するに， SXCALL マクロで 呼び出す かわりに， jsr _ TMEventW のようにして 呼び出 
してやれば よいので す。 このと き， 注意が 必要な のは， _ TMEventW が 外部 シンボル である 
こ とを 宣言して おく 必要が ある こ とです。 ソースの 先頭な どで， 
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.xref TMEventW 

のよう にして 宣言して おいてく ださい。 これで アセンブルは 問題な く 行える はずです。 

次は リンクに ついて 考えて みます。 

この プログラムを foo.s とすると， アセンブルした 結果， foo.o という オブジェクト フア 
イ ルが 生成され ている はずです。 通常， リンクは 


A>LK SKELTON too -Of 00(31 

といった ぐあいに 行います が， ライブラリを リンクし なければ ならない ので， 次のように リ 
ンクを 行って く ださい。 

A>LK SKELTON foo A : ¥LIB¥$XLIB.L -OfooCT 

外部 シンボルの 宣言が 行われて いれば， リ ン カが SXLIB . L の 中から 該当する ルーチンを 
自動的に リ ンク してく れる はずです。 
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SX コールリ フ アレンス 


SX-SYSTEM に 用意され ている 機能を 利用す るには， SX 
コールと 呼ばれる $ A 系列 未定義 命令を 利用した 手順を 経て 
行います。 この 章では， SX 1.10 になって 追加， あるいは 仕様 
が 変更され た SX コールに ついて， 筆者が 独自に 解析した 結 
果を もとにした リファレンスを 示して います。 前著 『 SX - 
WINDOW プログラミング』 の リファレンスと あわせて ご 利 
用く ださい。 


第 5 章 SX コールリ フ アレンス 


SX コール •リファレンスの 利用 法 


SX - SYSTEM の 各 マネージャの 機能は， 未定義 命 
令 $ A 系列を 通じて ユーザーに 提供され ます。 これら 
提供され る ものを SX コールと 呼ぶ こ とに します。 

SX コールの 一般的な 利用 法は 次のと おりです。 

⑴ 必要な 数， 型の 引数を スタックに 積む 

(2) SX コ ー ル 疑似 命令 （ $ A 系列 未定義 命令） を 実行す 
る 

(3) スタックを 補正す る 

⑵ は， SX コール 疑似 命令を dc . w で 置いて も かまわ 
ない のです が， SX コールで ある ことを 明示す るた め 
に， マクロ SXCALL を 定義す る ことにします。 


SXCALL macro 

num 

dc.w 

num 

endm 



また ， SX コールの 名称と 疑似 命令 コードを equ で 結 
び 付ける イ ン クルー ド ファイルを 用意し， それを 利用 
する ことによって， さらに 可読性が 上がり ますが， 本 
書では 番号で 示す ことにして います。 

SX コールは， Human の DOS コールな どと 同様で 
す。 結果は レジスタの DO と A 0 に 返り ます。 返り 値を 返 
さ ない SX コールで も DO と A 0 は 破壊 される ので 注意 
してく ださい。 フラグ 類 も 変化し ます。 


凡例： 


SX コール 番号 


コール 名。 コール 名が •になって いるもの 
は 未 公開 コールな ので， 利用す るのは 控えた 
ほろ がよ い。 また， ◎が 記されて いる コー 
/ ルは， SX 1.02 から SX 1.10 になって 仕様が 
変更に なった もの や 正式に 公開され た コール 
を 表す。 


コールす る 際に スタックに 
積むべき 引数。 その サイズ， 
引数 名， 引数の 持つ 意味が ~ 
書かれて いる。 


•リファレンス 利用に 関する 注意 I 
sx コールリ ファ レンスは， 筆者の 
独自の 解析を もとに 解説され てい ま 
す。 とくに， 未 公開 コールに ついて 
は， SX-SYSTEM の パージョン アップ 
などに よって 動作し なくなる 可能性 
が あり， その 利用には 十分 注意して 
ください 0 未 公開 コールは， あくま 
で 参考と して 掲載して います。 

また， 本 資料の 内容に 関する シャ 
—プ (株への 質問， お問い合わせ など 
は いっさい 行わない よう にお 願いし 
ます。 


SA092 KBFIagGet 

キーボード マネージャの フラグ 頮を 一括して 返す。 _ 


[引数] 

long kbRec 
_ [ 返り 値] 

DO.L キー ポ ー ド マネ ー ジヤの フラグ 


キー ポー ド レコー ドの ア ドレス 


bitO 

Halt 

bitl 

ResetOn 

bit2 

OldOn 

bit3 

LedOn 

bit4 

ClickOn 

bit5 

RepeatOn 

bit6 

AssignOn 


[コール] 


pea kbRec 

SXCALL $A092 
addq.l 巷 4,sp 


コール 機能 解説。 その 
/ コールが 持つ 働きと 使用 
上の 注意が 書かれて いる „ 


呼び出し 後の 戻り 値 0 レ 
/ ジス タと その 意味が 書か 
^ れ ている。 


コール 例。 おもに 引数の 順に 注慂 して ほしい。 
引数の ない SX コー ルに ついては 載せて いない。 
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キ _ ボ ー ド マネ ー ジヤ / リソ ー ス マネ ー ジヤ 


キ ー ボ ー ドマ ネ —— ジヤ 


SA092 KBFIagGet 

キーボード マネージャの フラグ 類を 一括して 返す。 

[引数] 

long kbRec キ ー ポ ー ド レコ ー ドの アドレス 

[返り 値] 

DO.L キー ポー ド マネージャの フラグ 


bitO 

Halt 

bitl 

ResetOn 

bit£ 

OldOn 

bit3 

LedOn 

bit4 

ClickOn 

bit5 

RepeatOn 

bit6 

AssignOn 


[コール] 

pea kbRec 

SX 〇 ALL $A092 
addq.l #4,sp 


SA093 KBFIagSet 

キー ボー ドマ ネー ジャ のフラ グ 類を 一括し て 設定す る。 

[引数] 

long kbRec キー ポー ドレ コードの アドレス 

long flags フラ グ 類の 状態 


bitO 

Halt 

bitl 

ResetOn 

bit£ 

OldOn 

bit3 

LedOn 

bit4 

ClickOn 

bit5 

RepeatOn 

bit6 

AssignOn 


[返り 値] 

DO.L 前の フラグの 状態 

[コール] 

move.l # flags.-(sp) 

pea kbRec 

SXCALL $A093 

addq.l # 8,sp 


■ J ソース マネージャ 


$A0ED RMResLinkGet 

指* 定 した リ ソース マップの 次の リ ソース マップを 得る。 

[引数] 

long ResMap リソース マップへの ハンドル 

[返り 値] 

DO.L 次の リ ソース マップへの ハン ドル 

[コール] 

pea ResMap 

SXCALL $AOED 
addq.l # 4,sp 


$A0EE RMResTypeList 

指定 した リソース マツ プに 登録 さ れ ている タイプの 
数と リス トを $ 导る 。リス トは， タイプ 名 a ロング、 ワー 
ド） が タイプの 数 だけ 並んで いる 構造。 末尾は 〇丄。 
リス トが 不要に なったら 廃棄す る 必要が ある。 
再配置が 発生す る。 


[引数] 


long argc 

タイ プの 数が 返る バッ ファ （1 
ロング ワー ド） のア ドレス 

long argv 

タイ プの リス ト への ハン ドル 
が 返る バッ ファ (1 ロング 
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long 

ResMap 

ワー ド) ア ドレス 
リ ソース マップの ハン ドル 

[返り 値] 

DO.L 

= 0 

正常終了 


在 0 

エラー 

[コール] 


pea 

ResMap 


pea 

argv 


pea 

argc 


SXCALL 

$A0EE 


lea 

l£(sp),sp 


$AOEF RMResIDList 


指定した リソース マ ップに 登録され てい る タイ プの 
ID の 数と リストを 得る 0 リストは ID (1 ワード） が 
ID の 数 だけ 並んで いる 構造。 末尾は 0.W 。 リストが 
不要に なったら 廃棄す る 必要が ある。 

再配置が 発生す る。 


[引数] 

long 

argc 

ID の 数が 返る バッ ファ （1 口 

long 

argv 

ングワ ー ド) のア ドレス 

ID の リス トが 返る バッファ 

long 

ResMap 

(ID の 数 xl ワー ド) の アド 

レス 

リ ソー スマップへの ハン ドル 

long 

Type 

タイプ 

[返り 値] 

DO.L 

= 0 

正常終了 


在 0 

エラー 

[コール] 


move.l 

# Typer(sp) 


pea 

ResMap 


pea 

argv 


pea 

argc 


SXCALL 

$A0EP 


lea 

16(sp),sp 


ウインドウ マネージャ 


$A1FF WMSelect2 

winPtr で 指定 した ウィンド ウ を， サブ ウィンドウ 
を 消去せ ずに アク ティ ブに する。 

再配置が 発生す る。 

[引数] 

long winPtr ウインドウ レコードの アドレス 

[返り 値] 

DO.L リ ザル ト コード 

[コール] 

pea winPtr 

SXCALL $A1FP 
addq.l #4,sp 

$A22C WMOptionGet 

カレント ウインドウの ウインドウ オプション 

(wOption) を 返す。 

[引数] 

なし 


[返り 値] 

DO.L ウインドウ ォプ ショ ン (下位 ワー ドの み 意 
味を 持つ） 

$AE2D WMOptionSet 

カレント ウインドウの ウインドウ オプション 
(wOption) を 設定す る。 


[引数] 

word wOpt 
[返り 値] 

なし 

[コール] 

move.w 

SXCALL 

addq.l 


ウィン ドウ オプション 


# wOpt-(sp) 

$A££D 

#2,sp 
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コン ト ロー ル マネージャ 


$A2A0 CMOptionGet 

ctrlHdl で 指定 した コント ロ ー ルの， コント ロ ー ル 
オプション （ cOption) を 返す。 

[引数] 

long ctrlHdl コン ト ロー ルレ コードへの ハ 

ン ドル 

[返り 値] 

DO.L コント ロー ルオ プ シヨ ン (下位 ワー ドの 

意味を 持つ） 

[コール] 

pea ctrlHdl 

SXCALL $A£AO 
addq.l #4,sp 

$A2A1 CMOptionSet 

ctrlHdl で 指定 した コント ロ ー ルの， コント ロ ー ル 
オプション （ cOption) を 設定す る。 


[引数] 


long 

ctrlHdl 

コン ト ロール レコ ー ドへの ハ 



ン ドル 

word 

cOpt 

コン ト ロール オプション 

[返り 値] 



なし 



[コール] 

move.w 

# cOpt-(sp) 


pea 

ctrlHdl 


SXCALL 

$A£A1 


addq.l 

#6,sp 


$A2A2 CMUserGet 


ctrlHdl で 指定した コントロールの， ユーザ 用の 
ワーク （ cUser) を 返す。 

[引数] 


pea ctrlHdl 

SXCALL $A2A£ 
addq.l #4,sp 

$A2A3 CMUserSet — 

ctrlHdl で 指定した コントロールの， ユーザ 用の 
ワーク （ cUser) を 設定す る。 


[引数] 

long 

ctrlHdl 

コン ト ロ ー ル レコ ー ドへの ハ 

long 

cUser 

ン ドル 

ユーザ 用の ワークの 値 

[返り 値] 

なし 

[コール] 


move.l 

# cDser.-(sp) 


pea 

ctrlHdl 


SXCALL 

$A2A3 


addq.l 

#8,sp 


$A2A4 CMProcGet 


ctrlHdl で 指定 した コント ロ ー ルの， ドラ ッ グ 時の 
手続きの アドレス （ cProc) を 返す 0 

[引数] 


long 

ctrlHdl 

コン ト ロー ルレ コー ドへの ハ 

ン ドル 

[返り 値] 

DO.L 

ドラッグ 時の 手続きの ア ドレス 

[コール] 


pea 

ctrlHdl 


SXCALL 

$A£A4 


addq.l 

#4,sp 


$A2A5 CMProcSet 


ctrlHdl で 指定 した コント ロ ー ルの， ドラ ッ グ 時の 
手続きの アドレス （ cProc) を 設定す る 0 


long ctrlHdl コン ト ロー ルレ コードへの ハ 


ン ドル 

[引数] 



[返り 値] 

long 

ctrlHdl 

コン ト ロ ー ル レコ ー ドへの ハ 

DO.L ユーザ 用の ワークの 値 



ン ドル 

[コール] 

long 

cProc 

ドラ ッ グ時の 手続きの ア ドレス 


277 



第 5 章 SX コールリ フ アレンス 


[ 返り 値 ] 



なし 



[ コール ] 

pea 

cProc 


pea 

ctrlHdl 


SXCALL 

$A2A5 


addq.l 

#8,sp 


SA2A6 CMDefDataGet 

ctrlHdl で 指定した コントロールの， 定義 関数の 
データ （ cDefData) を 返す。 

[ 引数 ] 

long ctrlHdl コン ト ロール レコー ドへの ハ 
ン ドル 

[ 返り 値 ] 

DO.L 定義 関数の デー タ 

[ コール ] 


addq.l # 4,sp 

$A2A7 CMDefDataSet 

ctrlHdl で 指定した コントロールの， 定義 関数の 
データ （ cDefData) を 設定す る。 


[ 引数 ] 

long 

ctrlHdl 

コン ト ロール レコ ー ドへの ハ 

ン ドル 

long 

cDefData 

定義 関数の データ 

[ 返り 値 ] 

なし 

[ コール ] 


move.l 

# cDefData.-(sp) 


pea 

ctrlHdl 


SXCALL 

$A£A7 


addq.l 

#8,sp 


pea ctrlHdl 

SXCALL $A2A6 


メニュー マネージャ 


$A269 MNConvert 

strZPtr で 指定した 文字列に よって， メニュー レ 
コードを 作成す る。 menuHdl が 0 の 場合， メニュー 
マネージャが ヒープ 上に 作成す る。 

メニュー 定義 文字列は， 基本的に メニュー アイテム 
を 1 つず つ カンマで 区切った もので， 特殊 文字を 利 
用す る ことによって， ショートカット や チェック マー 
クの 指定を 行う ことができる。 


特殊 文字 

内 容 

へ 

ショー ト カット 文字の 指定。 次の 1 文字が 


ショー ト カッ ト 文字と なる 

- 

この 文字で 始まる アイテムは イ ン アクティブ 


となる 

1 

チェック マ ー クを つける 


再配置が 発生す る。 


[ 引数 ] 

long 

menuHdl 

メニュー レコ ー ドへの ハン ドル 

long 

strZPtr 

メニュー 定義 文字列 (ASCIIZ) 
への ポインタ 

word 

Id 

メニュー 定義 関数の ID 

[ 返り 値 ] 

DO.L 

リザルト コ ー 

ド 

AO.L 

メニュー レコ 

ー ドへの ハン ドル 

[ コール ] 


move.w 

#Id,-(sp) 


pea 

strZPtr 


pea 

menuHdl 


SXCALL 

$A£69 


lea 

10(sp),sp 
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サブ ウイン ドウ マネー ジヤ 


$A227 WSOpen 

新しい サブ ウィンドウを 開く。 sWinPtr が 0 の 場 
合， サブ ウィン ドウ マネージャが ヒープ 上に 作成す る。 
再配置が 発生す る。 


[引数] 

long 

sWinPtr 

サブ ウイン ドウ レコー ドの ア 

ドレス 

long 

rgnHdl 

アウ ト サイ ドリー ジョンと な 

る リージ ョ ン への ハン ドル 

long 

prio 

プライオリティ 値 

[返り 値] 

DO.L 

リ ザル トコ 

— ド 

AO.L 

サブ ウイ ンド ウレ コー ドの ア ドレス 

[コール] 


move.l 

# prio.-(sp) 


pea 

rgnHdl 


pea 

sWinPtr 


SXCALL 

$A£27 


lea 

12(sp),sp 


$A228 WSCIose 


sWinPtr で 指定した サブ ウインドウを 閉じ， サブ 
ウインドウ リス トから 削除す る 0 サブ ウイ ンド ウレ 
コードを ヒープ 上 以外に 作成して いた 場合に 使用す 
る。 

再配置が 発生す る。 

[引数] 


long 

sWinPtr 

サブ ウイン ドウ レコー ドの ア 

ドレス 

[返り 値] 

DO.L 

リ ザル トコ 

—ド 

[コール] 


pea 

sWinPtr 


SXCALL 

$A228 


addq.l 

#4,sp 


SA229 WSDispose 


sWinPtr で 指定した サブ ウインドウを 閉じ， サブ 
ウィン ドウ リス トから 削除 L た 後， サブ ウ インド ウレ 


コードと して 確保され ていた ブロックを 廃棄す る。 サ 
ブ ウインドウ レコードを ヒープ 上に 作成し ていた 場合 
に 使用す る。 

再配置が 発生す る。 

[引数] 

long sWinPtr サブ ウインドウ レコードの ア 
ドレス 

[返り 値] 

DO.L リ ザル トコー ド 
[コール] 

pea sWinPtr 

SXCALL $A££9 
addq.l #4,sp 

SA22A WSEnlist 

sWinPtr で 指定した サブ ウ インド ウを サブ ウイン 
ドウ リスト に加える。 

[引数] 

long sWinPtr サブ ウインドウ レコードの ア 

ドレス 

[返り 値] 

DO.L リ ザル トコー ド 

[コール] 

pea sWinPtr 

SXCALL 

addq.l #4,sp 

$A22B WSDelist 

sWinPtr で 指定した サブ ウイン ドウを サブ ウイン 
ドウ リス トから 削除す る。 

[引数] 

long sWinPtr サブ ウインドウ レコー ドの ア 
ドレス 

[返り 値] 

DO.L リザルト コード 

[コール] 

pea sWinPtr 

SXCALL $A2£B 
addq.l # 4,sp 
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プリン ト マネージャ 


$A4E0 PMInit 

プリ ント マネージャを 初期化す る。 

メモリ マネージャ， リソース マネージャ， イベント 
マネージャ ，メ ニュー マネージャ， グラ フィ ッ クマ ネー 
ジャ， ウィンドウ マネージャが 初期化され， リソース 
ファイル SYSTEM.LB が オープンされ ている 必要 
が ある。 

[引数] 

なし 

[返り 値] 

DO.L リ ザル ト コード 

$A4E1 PMTini 

プリン トマ ネージ ャの 終了 処理を 行う。 

再配置が 発生す る。 

[引数] 

なし 

[返り 値] 

DO.L リ ザル ト コード 


$A4E2 PMOpen 

drvrID で 指定 した ID の プリンタ ドライバを リ 
ソース PTRD から メモリ 上に 読み込み ロックす る。 
drvrID と して- 1 を 指定した 場合， SRAM に 記録 さ 
れ ている デフ オルト の プリ ンタ ドライ バが 使用され 
る。 

再配置が 発生す る。 


[引数] 


word 

drvrID 

ドライバの ID 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 


=-2 

すでに ドライバが オープン 

されて いる 

[コール] 


move.w 

# drvrID, -(sp) 


SXCALL 

$A4E2 


addq.l 

#2,sp 


SA4E3 PMCIose 

プリンタ ドライバの 終了 処理を 行い， ドライバが 使 
用して いた ブロ ックを 廃棄す る。 

再配置が 発生す る。 

[引数] 

なし 

[返り 値] 

DO.L リザルト コード 

SA4E4 PMSetDefault 

prRecHdl で 指定した 印 刷 環境 レコードに デフ ォ 
ル トの 値 （リ ソース PrEV の IDO に 記録され ている， 
あるいは ドライバ 自 体が 保持 している） を セツ トする 0 
再配置が 発生す る。 

[引数] 


long 

prRecHdl 

印刷 環境 レコー ドへの ハンドル 

[返り 値] 

DO.L 

リ ザル トコー 

, K 

AO.L 

印刷 環境 レコ 

ー ドへの ハン ドル 

[コール] 


pea 

prRecHdl 


SXCALL 

$A4E4 


addq.l 

#4,sp 


$A4E5 PMValidate 


prRecHdl で 指定した 印 刷 環境 レコードの 内容が 
正しい かどう かを チヱ ック し， 調整す る。 

[引数] 

long prRecHdl 印刷 腸 境 レコー ドへの ハンドル 

[返り 値] 

DO.L =0 調整せ ず, レコードの 内容に 

変化は ない 

=1 調整を 行った 

=-1 エラー 

[コール] 

pea prRecHdl 

SXCALL $A4E5 

addq.l #4，sp 
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$A4EB PMImageDialog 

ページ 印刷用の 印刷 環境 設定 ダイアログを オープン 
し， ユーザの 操作を 受けつ けた 後， クローズ する。 そ 
の 結果を もと に prRecHdl で 指定 した 印刷 環境 レ 
コードの 内容を 設定す る。 

再配置が 発生す る。 


long 

long 

[返り 値] 
DO.L 


srcHdl 

dstHdl 

= 0 
=1 
=-1 


コ ピー 元の 印刷 環境 レコード 
への ハン ドル 

コ ピー 先の 印刷 環境 レコード 
への ハン ドル 

調整を 行わなかった 
調整を 行った 
ェラー 


[引数] 



[コール] 

long 

prRecHdl 

印刷 環境 レコ— ドへの ハンドル 

pea dstHdl 

[返り 値] 



pea srcHdl 

D0.L 

= 0 

レコ ー ドの 内容に 変化は ない 

SXCALL $A4E9 


=1 

設定を 行った 

addq.l # 8,sp 

[コール] 

=-1 

エラー 

$A4EA PMJobCopy 


pea 

prRecHdl 

srcHdl で 指定し た 印刷 環境 レコ ー ドの 実行 部分の 


SX 〇 ALL 

$A4E6 

データ dstHdl で 指定 した レコードに コピーす る。 そ 


addq.l 

#4,sp 

の 際， 値の チェックと 調整が 行われる。 


$A4E7 PMStrDialog 

コード 印刷用の 印刷 環境 設定 ダ イア ログを オープン 
し， ユーザの 操作を 受けつ けた 後， クローズ する。 そ 
の 結果を もと に prRecHdl で 指定した 印刷 環境 レ 
コー ドの 内容を 設定す る。 

再配置が 発生す る。 

SX1.10 標準 添付の プリ ンタ ドライバでは サポート 


実行 部分とは， 具体的には 印刷 開始 ページ 
( prPstPage ), 印刷 終了 ページ （ prLstPage)， 1 
ページ あたりの 印刷 枚数 （prDupPage)， 印刷 モー 
ド （prMode)， 印刷 モードの マスク （prMask)， そ 


されて い 

ない。 

[引数] 

long 

prRecHdl 

[返り 値] 

D0.L 

=0 

=1 

[コール] 

=-1 

pea 

SXCALL 

addq.l 


レコ ー ドの 内容に 変化は ない 

設定を 行った 

ェラー 

prRecHdl 

$A4E7 

#4，sp 


して， システム 予約 （prJobRsv ) を 意味す る 0 

[引数] 

long 

srcHdl 

コ ピー 元の 印刷 環境 レコード 

への ハン ドル 

long 

dstHdl 

コ ピー 先の 印刷 環境 レコード 

への ハン ドル 

[返り 値] 

D0.L 

= 0 

調整を 行わなかった 


=1 

調整を 行った 


=-1 

エラー 

[コール] 


pea 

dstHdl 


pea 

srcHdl 


SXCALL 

$A4EA 


addq.l 

#8,sp 


$A4E9 PMEnvCopy 

srcHdl で 指定した 印刷 環境 レコードの 内容を， 
dstHdl で 指定 した レコード に コピーす る。 そ の 際， 
値の チェックと 調整が 行われる。 

[引数] 


$A4EB PMOpenlmage 

ページ 印刷用の グラフ ポートを 作成し， ページ 印刷 
を 開始す る。 

再配置が 発生す る。 

[引数] 

long prRecHdl 印刷 環境 レコー ドへの ハンドル 
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[返り 値] 

DO.L 

リ ザル トコ 

-ド 

AO.L 

グラフ ポー トの アドレス 

[コール] 


pea 

prRecHdl 


SXCALL 

$A4EB 


addq.l 

#4,sp 


SA4EC PMRecordPage 

ページ 印刷の スクリプト の 記録を 開始す る。 
rectPtr で 指定し た 範囲が， 後の 印刷 時に 印刷され 
る。 

再配置が 発生す る。 

[引数] 

long rectPtr 印刷 範囲を 意味す るレク タン 

グルレ コー ドの ア ドレス 

[返り 値] 

DO.L リ ザル ト コード 

[コール] 

pea rectPtr 

SXCALL $A4EC 
addq.l #4,sp 

SA4ED PMPrintPage 

ページ 印刷用 スクリプトの 記録を 終了し， 実際の 印 
刷を 開始す る。 

再配置が 発生す る。 


[引数] 

long 

param 

かならず 0 を 指定す る 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


move.l 

# param, 


SXCALL 

$A4ED 


addq.l 

#4,sp 


$A4EE PMCancelPage 


DO.L リザルト コード 

$A4EF PMAction 

印刷 処理を 行う。 Ctrl で 指定した 動作を 行い， そ 
の 結果を 返す。 

再配置が 発生す る。 

[引数] 

word Ctrl 動作の 指定 


0(PC STAT) 印刷を 続行す る 
1(PC END) 印刷を 終了す る 
2(PC_ST0P) 印刷を 中断す る 
3(PC CONT) 印刷を 再開す る 


[返り 値] 


DO.L 実行 結果 


0(P FINISH) 

印刷が 終了した 

1(P_ WORKING) 

印刷 中 

2(P 一 RESTING) 

印刷を 中断した 

3(P_TIMEOUT) 

タイム アウ ト 発生 

-1(P 一 ERROR) 

エラー 発生 


[コール] 

move.w # Ctrl ,-(sp) 

SXCALL $A4EP 
addq.l # 2,sp 

$A4F0 PMCIoselmage 

ページ 印刷を 終了 し， グラフ ポートな どを 廃棄す る。 
再配置が 発生す る。 

[引数] 

なし 

[返り 値] 

DO.L リ ザル ト コード 

$A4F1 PMDrawString 


ページ 印刷用 スクリプトの 記録を 中止す る。 印刷は 
行われない。 

再配置が 発生す る。 

[引数] 

なし 

[返り 値] 


strHdl, length で 指定した 文字列の コード 印刷を 
開始す る。 

再配置が 発生す る。 

[引数] 

long prRecHdl 印刷 環境 レコー ドへの ハンドル 
long strHdl 文字列への ハンドル 
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long 

length 

文字列の バイ ト 数 

[ コール ] 


long 

strOpt 

印刷 オプション 


move.l # param 3，-( sp ) 



=0 印刷 終了 時に 改 ページ 


move.l # param 2,-( sp ) 



コー ドを 出力す る 


move.l # paraml , -( sp ) 



=1 印刷 終了 時に 改 ページ 


move.l if cmd ,-( sp ) 



コ ー ドを 出力し ない 


SXCALL $ A 4 P 4 

[ 返り 値 ] 

リ ザル トコ 

-ド 


lea 16( sp),sp 

DU . J-j 

[ コー ル ] 

$A4F5 PMDrvrID 


move.l 

# strOpt , -( sp ) 

現在 才- 

-プン されて いる プリ ンタ ドライバの ID を 


move.l 

# length , -( sp ) 

返す。 



pea 

strHdl 




pea 

prRecHdl 

[ 引数 ] 



SXCALL 

$ A 4 F 1 

なし 



lea 

16( sp)，sp 

[ 返り 値 ] 

プリンタ ドライバの ID (下位 ワードの み 意 
味を 持つ） 

$A4F2 PMVer 

DO.L 

プリント マネージャの パ、 ージョ ンを 返す。 


=-1 プリ ンタ ドライバが オープン 

[ 引数 ] 

なし 




されて いない 



SA4F6 PMDrvrHdl 

[ 返り 値 ] 



現在 オープン 中の プリ ンタ ドライバが 収められ てい 

DO 丄 

バ ージョ ン 番号 (バージ ョ ン 1.00 で $0100) 

る ブロック 

，への ハンド ルを 返す。 

$A4F3 PMDrvrVer 

[ 引数 ] 


現在 才 

ープン されて いる プリンタ ドライ バの バー 

なし 


ジョンを 返す。 


[ 返り 値 ] 





DO.L 

リザルト コ ー ド 

[ 引数 ] 




=-1 プリ ンタ ドライバが オープン 

なし 




されて いない 

[ 返り 値 ] 



A 0 .L 

プリンタ ドライバへの ハン ドル 

DO.L 

ハ— ンヨ ノ番可 (ハ— ンヨ ノ 1.00 で $0100) 

=-1 プリンタ ドライバが オープン 

$A4R PMMaxRect 



されて いない 

pKind で 指定した 用紙の 印刷 可能な 最大 範囲を， 
rectPtr で 指定 した レク タング ル レコード に 返す。 

$A4F4 PMDrvrCtrl 

プリンタ ドライバを 直接 制御す る。 プリンタ ドライ 

[ 引数 ] 


バに 与え 

る コマンド， ノ 

、。ラ メータに ついては 本文 参照。 

long 

prRecHdl 印刷 環境 レコー ドへの ハンドル 




word 

pKind 用紙の 種類 

[ 引数 ] 



long 

rectPtr 結果が 返る レ クタ ン グルレ 

long 

cmd 

ドライバに 与える コマンド 


コー ドの ア ドレス 

long 

paraml 

パラメー タ 1 

[ 返り 値 ] 


long 

param £ 

パラメー タ 2 

DO.L 

リ ザル ト コード 

long 

param 3 

パラメータ 3 

AO.L 

印刷 環境 レコー ドへの ハン ドル 

[ 返り 値 ] 



[ コー ル ] 


DO.L 

リ ザル トコ 

-ド 


pea rectPtr 
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move.w # pKind.-(sp) 
pea prRecHdl 

SXCALL $A4F7 
lea 10 (sp)，sp 

$A4FB PMSaveEnv 

prRecHdl で 指定した 印 刷 環境 レコードの 内容を 
デフ オルトの 値と して， リソース PrEV の IDO に 記 
録 する。 

再配置が 発生す る。 

[引数] 

long prRecHdl 印 屈 丨嫘境 レコードへの ハンドル 

[返り 値] 

D0.L リ ザル ト コード 

[コール] 

pea prRecHdl 

SXCALL $A4P8 
addq.l #4,sp 

$A4F9 PMReady 

プリンタの 状態を 調べ， 結果を 返す。 

[引数] 

なし 

[返り 値] 

D0.L プリンタの 状態 


0(PS 一 BUSY) 

印刷 不可 

1(PS READY) 

印刷 可 


$A4FA PMProcPrint 

procPtr で 指定した ユーザー プロセスを 登録し， プ 
ロ セス 印刷を 開始す る。 


[引数] 

long prRecHdl 印刷 環境 レコー ドへの ハンドル 
long procPtr ユーザー プロセスの アドレス 

[返り 値] 

D0.L リ ザル ト コード 

[コール] 

pea procPtr 

pea prRecHdl 

SXCALL $A4PA 

addq.l #8,sp 

$A4FB PMDrvrlnfo 

drvrID で 指定 した プリンタ ド ライ バ に関する 情報 
を， resultPtr で 指定 した バッファに 返す 0 drvrID 
として- 1 を 指定す ると， デフ オルトの プリンタ ドラ 
イバの 情報が 返る。 

情報の 形式は 以下のと おり。 



+ $00.w 
+ $0£.w 

+ $04 

プリ ンタ ドライバの ID 
プリンタ ドライバの バージ ヨン 

プリンタ 名 (ASCIIZ) 

[引数] 



word 

drvrID 

プリ ンタ ドライバの ID 

long 

resultPtr 

結果が 返る バッファの ア ドレス 

[返り 値] 

D0.L 

リ ザル トコ - 

-ド 

A0.L 

resultPtr 


[コール] 


pea 

resultPtr 


move.w 

# drvrlD.-(sp) 


SXCALL 

$A4PB 


addq.l 

#6,sp 
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テキス ト マネー ジヤ 


SA317 ©TMKey. 

tEHdl で 指定され た テキス ト エディ ツト レコード 
の 編集 テキストに， keyChar で 指定され た キヤ ラク 
夕を 入力して 再 表示す る。 あらかじめ グラフ ポートを 
セットして おく 必要が ある。 

再配置が 発生す る。 


[引数] 


long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

word 

keyChar 

入カ キャラクタ 

[返り 値] 

DO.L 

リ ザル トコ 

—ド 


=0 

編集し なかった 


=1 

編集した 

[コール] 


move.w 

# keyChar ,-( sp ) 


pea 

tEHdl 


SXCALL 

$ A 317 


addq.l 

#6 ,sp 


$A31B ©TMStr 


tEHdl で 指定され た テキス ト エディット レコード 
の 編集 テキストの セレクト 領域を， textPtr で 指定 
した 文字列と 置き換える 。 CR ($0 D ) 以外の 制御 コー 
ドを 含める ことは できない。 再 表示は 行わない。 
再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レ 

long 

textPtr 

への ハン ドル 

テキス トへの ポインタ 

long 

length 

テキス トの バイ ト 数 

[返り 値] 

DO.L 

リ ザル トコ 

—ド 


=0 

編集し なかった 


=1 

編集した 

[コール] 


move.l 

# length , -( sp ) 


pea 

textPtr 


pea 

tEHdl 


SXCALL $ A 318 
lea 12( sp)，sp 

$A319 TMCalText ~ 

tEHdl で 指定 した テキスト エディット の 段落 情報 
を 計算/設定 する。 カーソルの 位置な どは 変更され な 
いので， 通常は $ A 464 TMSetSelCal を 利用す る。 
再 表示は 行われない。 

再配置が 発生す る。 

[引数] 

long tEHdl テキスト エディット レコード 

への ハン ドル 

[返り 値] 

DO.L リザルト コード 

[コール] 

pea tEHdl 

SXCALL $ A 319 

addq.l # 4 ，sp 

$A31C ©TMEvent 

tEHdl で 指定され た テキス ト エディ ット レコード 
について， eventRec で 指定 された イベント レコード 
の 内容に 対応す る 処理を 行う。 あらかじめ グラフ ポー 
卜を セット して おく 必要が ある。 

再配置が 発生す る。 

対応す るのは， 以下の 4 つの イベント。 これらの 
処理の 後， 再 表示が 行われる。 

•ヌノ レイ ベント 

キャ レッ トの 点滅を 行う 0 

• マウス レフ ト ダウン イベント 

セレクト 領域の 変更を 行う 0 
•マウス ライ ト ダウン イベント 
ポップアップ メニューを 表示して， テキスト マネ 
ー ジャス クラップとの 間で カッ ト & ペース トを 行う。 

• キー ダウン イベント 

キャラクタの 入力を 行う （全角に も 対応)。 カー ソ 
ル キー， BS ， DEL , ROLL UP/DOWN キーに 対 
応 する。 

[引数] 

long tEHdl テキス ト エディット レコード 
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への ハンドル 

long eventRec イ ベン ト レコードの ア ドレス 

[返り 値] 

DO 丄 リ ザル トコー ド 

=0 編集し なかった 

=1 編集した 

[コール] 

pea eventRec 

pea tEHdl 

SXCALL $A31C 

addq.l # 8，sp 

$A320 ©TMCut 


[コール] 

pea tEHdl 

SXCALL $A322 
addq.l # 4，sp 

$A323 ©TMDelete 

tEHdl で 指定され た テキス トエ デイ ット レコード 
の 編集 テキストの セレクト 領域を カットし， 再 表示す 
る。 テキスト マネージャ スクラップの 内容は 変化し な 
い。 あらかじめ グラフ ポートを セットして おく 必要が 
ある。 

再配置が 発生す る。 


tEHdl で 指定され た テキス トェ デイ ット レコード 
の 編集 テキストの セレクト 領域を カットし， テキスト 
マネージ ヤス クラップに 移し， 再 表示す る。 あら かじ 
め グラフ ポートを セット して おく 必要が ある。 
再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコー 

への ハン ドル 

[返り 値] 

D0.L 

リ ザル トコ 

— ド 


= 0 

編集し なかった 


=1 

編集した 

[コー •ル] 


pea 

tEHdl 


SXCALL 

$A320 


addq.l 

#4,sp 


$A322 ©TMPaste 


tEHdl で 指定され た テキス ト エディッ トレ コード 
の 編集 テキストの セレクト 領域を， テキスト マネー 
ジャス クラップの 内容と 置き換え， 再 表示す る。 あら 
かじめ グラフ ポートを セットして おく 必要が ある。 テ 
キス トマ ネー ジャス クラップの 内容は 変化し ない。 
再配置が 発生す る。 

[引数] 

long tEHdl テキス ト エディツ ト レコード 

への ハン ドル 

[返り 値] 

D0.L リ ザル トコー ド 

=0 編集し なかった 

=1 編集した 


[引数] 

long tEHdl テキス ト エディツ ト レコード 

への ハン ドル 

[返り 値] 

D0.L リ ザル トコー ド 

=0 編集し なかった 

=1 編集した 

[コール] 

pea tEHdl 

SXCALL $A324 

addq.l # 4，sp 

$A324 TMInsert 

tEHdl で 指定した テキス トェ ディ ットの セレクト 
領域と strPtr で 指定し た 文字列を 置き換え て 再 表示 
する。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ 

への ハン ドル 

long 

strPtr 

文字列の ア ドレス 

long 

length 

文字列の バイ ト 数 

[返り 値] 

DO.L 

リ ザル トコ 

— ド 


= 0 

編集し なかった 


=1 

編集した 

[コール] 


move.l 

# length-(sp) 


pea 

strPtr 


pea 

tEHdl 


SXCALL 

$A3£4 


lea 

l£(sp),sp 
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$A32C TMCacheON 

tEHdl で 指定した テキス ト エディット について， 
size で 指定した サイズの キャッシュを 用意し， ON 
にす る。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコー ド 

への ハン ドル 

long 

size 

キャッシュの バイ ト 数 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


move.l 

# size .-( sp ) 


pea 

tEHdl 


SXCALL 

$ A 32 C 


addq.l 

#8 ,sp 


$A32D TMCacheOFF 


tEHdl で 指定した テキスト エディット レコー ドの 
キャッシュを 廃棄し， OFF にす る。 

再配置が 発生す る。 

[引数] 


long 

tEHdl 

テキス ト エディツ トレ コード 

への ハン ドル 

[返り 値] 

DO.L 

リ ザル トコ 

-ド 

[コール] 


pea 

tEHdl 


SXCALL 

$ A 32 D 


addq.l 

#4 ,sp 


$A32E TMCacheFlush 


SXCALL $ A 32 E 
addq.l # 4 ，sp 

$A32F TMShow 

tEHdl で 指定 した テキスト エディットの ドロー レ 
ベルを +1 する。 再 描画は 行わない。 

[引数] 


long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

[返り 値] 

DO.L 

ドロー レベルを +1 した 結果の 値 

[コール] 


pea 

tEHdl 


SXCALL 

$ A 3 £P 


addq.l 

#4 ,sp 


$A330 TMHide 


tEHdl で 指定した テキス ト エディットの ドロー レ 
ベルを- 1 する 0 再ネ苗 画は 行わない 0 

[引数] 


long 

tEHdl 

テキス ト エディツ I 

への ハン ドル 

[返り 値] 

DO.L 

ドロー レベルを -1 した 結果の 値 

[コール] 


pea 

tEHdl 


SXCALL 

$ A 330 


addq.l 

#4 ,sp 


$A331 TMSelShow 


tEHdl で 指定した テキス ト エディット の ハイ ライ 
卜 表示 レベルを +1 する。 再 描画は 行わない。 


tEHdl で 指定した テキスト エディット レコードの [引数] 


キヤ ツシ 

ュをフ ラッシ 

ュ する。 

long 

tEHdl 

テキス ト エディツ ト レコード 

再配置が 発生す る。 




への ハン ドル 




[返り 値] 



[引数] 



DO.L 

ハイ ライ ト 表示 レベルを +1 した 結果の 値 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

[コール] 

pea 

tEHdl 

[返り 値] 




SXCALL 

$ A 331 

DO.L 

リ ザル トコ 

-ド 


addq.l 

#4 ,sp 


[コール] 


pea 


tEHdl 
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$A332 TMSelHide 

tEHdl で 指定した テキスト エディ ットの ハイ ライ 
卜 表示 レベルを -1 する 0 再ネ苗 画は 行わない。 

[引数] 


long 

tEHdl 

テキス ト エディツ ト レコ ー t 

への ハン ドル 

[返り 値] 

DO.L 

ハイ ライ 

卜 表示 レベルを -1 した 結果の 値 

[コール] 


pea 

tEHdl 


SXCALL $A33£ 


addq.l 

#4,sp 


SA333 TMSearchStrF 


tEHdl で 指定 した テキスト エディットの offsetl， 
offsets で 示される 範囲で， strPtr で 指定し た 文字 
列を 前方 検索す る。 大文字 小文字 等は 区別され る。 

procPtr で 指定す る フィ ルタ プロセスは， 検索 処 
理中 適当な 間隔で 呼び出される。 引数と して， A0 に 
tEHdl が 渡される。 返り 値と して DO に 0 以外を 返 
すと， 検索は 中断され， TMSerachStrF の 返り 値 
として， フイ ルタ プロセスの 返り 値が アプリ ケー シヨ 
ンに 返される。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディ ツト レコード 

への ハン ドル 

long 

strPtr 

検索 文字列の ァ ドレス 

long 

length 

検索 文字列の バィ ト 数 

long 

offsetl 

テキス トの 検索 開始 位置 (才 
フ セツ ト） 

long 

offsets 

テキス トの 検索 終了 位置 (才 

フ セツ ト） 

long 

procPtr 

フィ ルタ プロセスの アドレス 
(0 で 指定し ない） 

[返り 値] 

DO.L 

発見した 文字列の 位置 (オフセット） 


= - 1 

発見で きなかった 

AO.L 

発見した 文字列の バイ ト 数 

[コール] 


pea 

procPtr 


move.l 

# offsets -(sp) 


move.l 

# offsetl ,-(sp) 


move.l 

# lengthr(sp) 

pea 

strPtr 

pea 

tEHdl 

SXCALL 

$A333 

lea 

24(sp),sp 


$A334 TMSearchStrB 

tEHdl で 指定 した テキスト エディットの offsetl， 
offset2 で 示される 範囲で， strPtr で 指定 した 文字 
列を 後方 検索す る。 大文字 小文字 等は 区別され る。 

procPtr で 指定す る フィルタ プロセスは， 検索 処 
理中 適当な 間隔で 呼び出される。 引数と して， A0 に 
tEHdl が 渡される。 返り 値と して DO に 0 以外を 返 
すと， 検索は 中断され， TMSerachStrB の 返り 値 
と して フィルタ プロセスの 返り 値が アプリ ケー シヨ ン 
に 返される。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディ ツト レコード 

への ハン ドル 

long 

strPtr 

検索 文字列の ァ ドレス 

long 

length 

検索 文字列の バィ ト 数 

long 

offsetl 

テキス トの 検索 開始 位置 (才 
フ セツ ト） 

long 

offsets 

テキス トの 検索 終了 位置 (才 
フ セツ ト） 

long 

procPtr 

フィルタ プロセスの アドレス 
(0 で 指定し ない） 

[返り 値] 

DO.L 

発見し た 文字列の 位置 (オ フ セット） 


=-1 

発見で きなかった 

AO.L 

発見した 文字列の バイ ト 数 

[コール] 


pea 

procPtr 


move.l 

# offset£,-(sp) 


move.l 

# offsetl, -(sp) 


move.l 

# lengthr(sp) 


pea 

strPtr 


pea 

tEHdl 


SXCALL 

$A334 


lea 

£4(sp),sp 


$A335 TMTextlnWidth2 

tEHdl で 指定 した テキスト エディ ット レコードの 
環境 下で， StartPoint で 指定し た 位置から strPtr， 
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offset で 指定され る 文字列を 描画す る 場合 ， Width 
で 指定した ドット 数の 幅に 収まる 文字 数を 計算し， 結 
果を 返す。 

$ A 197 GMStrLength とは コント ロー ル コードの 
処理が 異なる。 $ OA$OD (改行 コード） が あった 場合， 
そこまでで 文字 数の 計算を 終了し， $09 (TAB コー 
ド） が あった 場合， TAB サイズ （ teTabSize ) にし 
たがって タブの 処理を 行う。 また， ほかの コント ロー 
ル コードの 場合， 編集 モード （ teDrawMode ) にし 
たがって 計算を 行う。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

strPtr 

文字列の ア ドレス 

long 

offset 

文字列の オフセット 

word 

Width 

文字列を 収める 幅 （ドッ ト 数） 

word 

StartPoint 

文字列の 口ー カル 座標-ディ 

ステ ィネ ー シヨ ンレク タング 

ルの 水平 方向 オフセット 

[返り 値] 

DO 丄 

収まる 文字列の バイ ト 数/リザ ル ト コード 

AO.L 

=0 

改行 コー ド 以外の 理由で 終了 

した 


关〇 

改行 コー ドに よ り 終了した 

[コール] 


move.w 

# StartPoint , -( sp ) 


move.w 

J Width , -( sp ) 


move.l 

# offset , -( sp ) 


pea 

strPtr 


pea 

tEHdl 


SXCALL 

$ A 335 


lea 

16( sp),sp . 


$A336 TMTextWidth2 


tEHdl で 指定した テキス ト エディット レコードの 
環境 下で， StartPoint で 指定し た 位置から strPtr ， 
offset , length で 指定 される 文字列を 描画す る 場合， 
それが 占める 幅 （ドット 数） を 計算し， 結果を 返す。 

$ A 196 GMStrWidth とは コントロール コードの 
処理が 異なる。 $0 A $0 D (改行 コード） が あった 場合， 
そこまでで ドット 数の 計算を 終了し， $09 ( TAB コー 
ド） が あった 場合， TAB サイズ （ teTabSize ) にし 
たがって タブの 処理を 行う。 また， ほかの コント ロー 
ル コードの 場合， 編集 モード （ teDrawMode ) にし 


たがって 計算を 行う。 
再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディット レコード 

への ハン ドル 

long 

strPtr 

文字列の ア ドレス 

long 

offset 

文字列の オフセット 

word 

length 

文字列の バイ ト 数 

word 

StartPoint 

文字列 の 口一 カ ル 座標-ディ 
ステ ィネー シヨ ンレク タング 

ルの 水平 方向 オフセット 

[返り 値] 

DO.L 

文字列の 占める 幅 （ドッ ト 数)/ リ ザル ト 

コ ー ド 

[コール] 


move.w 

# StartPoint , -( sp ) 


move.w 

# length , -( sp ) 


move.l 

# offset , -( sp ) 


pea 

strPtr 


pea 

tEHdl 


SXCALL 

$ A 336 


lea 

16( sp),sp 


$A337 TMDrawTextt 


tEHdl で 指定した テキス ト エディット レコードの 
環境 下で， StartPoint で 指定し た 位置から strPtr ， 
offset ， length で 指定され る 文字列を 描画す る。 あ 
ら かじめ ビュー レ クタ ン グルで クリッ プ 領域を 設定し 
て おく 必要が ある。 

$ A 196 GMStrWidth とは コントロール コードの 
処理が 異なる。 $0 A $0 D (改行 コード） が あった 場合， 
そこまでで 描画を 終了し， $09 ( TAB コード） があっ 
た 場合， TAB サイズ （ teTabSize ) にしたがって 夕 
ブの 処理を 行う。 また， ほかの コント ロー ル コードの 
場合， 編集 モード （ teDrawMode ) にしたがって 描 
画する。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディット レコード 

long 

strPtr 

への ハン ドル 

文字列の ア ドレス 

long 

offset 

文字列の オフセット 

word 

length 

文字列の バィ ト 数 

word 

StartPoint 

文字列 の ロー カ ル 座標-ディ 
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ステ イネ ー シヨ ンレク タング 
ルの 水平 方向 オフセット 


word 

TabMode 

=0 タブは ペン 位置を 移動 
する だけ 

右 0 タブは ハ •ック グラウンド 
カラーに よる 塗り潰し 

[返り 値] 

D0.L 

リ ザル トコ - 

-ド 

[コール] 


move.w 

# TabMode ,-(sp) 


move.w 

# StartPoint-(sp) 


move.w 

# length, -(sp) 


move.l 

# offset ,-(sp) 


pea 

strPtr 


pea 

tEHdl 


SXCALL 

$A337 


lea 

18(sp),sp 


$A338 TMUpDate2 


MsRecPtr で 指定した 編集 履歴 レコー ドに した 
がって， tEHdl で 指定した テキス ト エディツ トの 描 
画を 行う。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

hisRecPtr 

編集 履歴 レコ ー ドの ァ ドレス 

[返り 値] 

DO.L 

リ ザル トコー 

- K 

[コール] 


pea 

hisRecPtr 


pea 

tEHdl 


SXCALL 

$A338 


addq.l 

#8,sp 


SA339 TMUpDate3 


tEHdl で 指定 した， テキスト エディットの 
updtRectPtr で 指定 した レク タン グルで 示 される 範 
囲に 表示 さ れる 部分を 再 表示す る。 $A313 
TMUpDate との 違いは， バック グラウン ド カラーに 
よ る 塗り潰しを 行わない 点。 

再配置が 発生す る。 


への ハン ドル 

long updtRectPtr レク タング ルレ コー ドへの ポ 
イ ンタ （口 一 カ ル 座標） 

[返り 値] 

DO.L リ ザル トコ ー ド 

[コール] 

pea updtRectPtr 

pea tEHdl 

SXCALL $A339 

addq.l #8,sp 

$A33A TMCalCOLine 

tEHdl で 指定 した テキスト エディットの， offset 
で 指定した 段落 位置 （段落の 通し番号） の 段落 情報を 
columnPtr から の バッファ に 作成す る。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

columnPtr 

段落 情報を 作成す る バッファ 
($18 バイ ト） のア ドレス 

long 

offset 

段落 位置 

[返り 値] 

DO.L 

リ ザル トコ - 

_ K 

[コール] 


move.l 

# offset, -(sp) 


pea 

columnPtr 


pea 

tEHdl 


SXCALL 

$A33A 


lea 

12(sp),sp 


SA33C TMCalLine 


tEHdl で 指定した テキス ト エディッ トの， offset 
で 指定した 行 位置 （mode=l の 場合)， あるいは バイ 
卜 位置 （mode=0 の 場合） の 段落 情報を， columnPtr 
からの バッファに 作成す る。 

再配置が 発生す る。 

[引数] 

long tEHdl テキス ト エディツ ト レコード 

への ハン ドル 

long columnPtr 段落 情報を 作成す る バッファ 


[引数] 

long tEHdl テキス ト エディツ ト レコード 


($18 バイ ト） のア ドレス 

long offset 行 位置/バイ ト 位置 

word mode =0 offset は バイト 位置 
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=1 offset は 行 位置 

[返り 値] 

DO.L この 段落の バイ ト 位置/リザ ル ト コード 
[コール] 

move.w ff mode.-(sp) 

move.l # offset,-(sp) 

pea columnPtr 

pea tEHdl 

SXCALL $A33C 

lea 14(sp),sp 

$A33D TMLeftSel 

tEHdl で 指定した テキス ト エディットの セレクト 
領域の 直前 （1 つ 左） の 位置を 返す。 

[引数] 


long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

[返り 値] 

DO.L 

オフセット 



=-1 

セレ ク ト 領域が テキス トの ^! 

[コール] 


pea 

tEHdl 


SXCALL 

$A33D 


addq.l 

#4,sp 


$A33E TMRightSel 


tEHdl で 指定した テキスト エディ ットの セレクト 
領域の 直後 （1 つ 右） の 位置を 返す。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

[返り 値] 

DO.L 

オフセット 



=-1 

セレ ク ト 領域が テキス トの 最 

後 

[コール] 


pea 

tEHdl 


SXCALL 

$A33E 


addq.l 

#4,sp 


SA33F TMPointSel 


tEHdl で 指定 された テキス ト エディツ トの セレ ク 
卜 位置を， xpoint， ypoint で 指定した 座標に よって 
変更し， 再 表示す る。 セレクト 領域 変更 後に カーソル 


位置の 再 計算は 行う が， スク ロールは 行わない。 
再配置が 発生す る。 


[引数] 



long 

tEHdl 

テキス ト エディット レコー ド 

への ハン ドル 

long 

xpoint 

水平 座標 (ローカル 座標） 

long 

ypoint 

垂直 座標 (ローカル 座標） 

word 

extend 

=0 新規 セレクト 領域 


=1 前回の セレ ク ト 領域を 
変更 

=2 セレクト 領域 開始 位置 
の 変更 

=3 セレクト 領域 終了 位置 
の 変更 


[返り 値] 

D0.L 

リ ザル トコ 

"" ド 

[コール] 


move.w 

# extend, -(sp) 


move.l 

# ypoint,-(sp) 


move.l 

# xpoint, - (sp) 


pea 

tEHdl 


SXCALL 

$A33P 


lea 

14(sp),sp 


SA340 TMOffsetSel 


tEHdl で^ •定 された テキス トエ デイ ツトの セレ ク 
卜 位置を， offset で 指定した バイ ト 位置に よって 変 
更 し， 再 表示す る。 セレクト 領域 変更 後に 力ー ソル 位 
置の 再 計算は 行う が， スクロールは 行わない。 
再配置が 発生す る。 


[引数] 



long 

tEHdl 

テキス ト エディツ ト レコード 



への ハン ドル 

long 

offset 

バィト 位置 

word 

extend 

=0 新規 セレクト 領域 


=1 前回の セレクト 領域を 
変更 

=£ セレクト 領域 開始 位置 
の 変更 

=3 セレクト 領域 終了 位置 
の 変更 

[返り 値] 

DO.L リザルト コード 

[コール] 
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move.w # extend, -(sp) 

move.l ft offset, -(sp) 

pea tEHdl 

SXCALL $A340 


lea 10(sp),sp 

SA341 TMPointToLine 

tEHdl で 指定 した テキスト エディットの， xpoint 
ypoint で 指定し た 座標の 段落 情報を， colmnnPtr か 
らの バッファに 作成す る。 

再配置が 発生す る。 


[引数] 



long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

xpoint 

水平 座標 (口ー カル 座標） 

long 

ypoint 

垂直 座標 ( ロー カ ル 座標） 

long 

columnPtr 

段落 情報を 作成す る バッファ 

($18 バイ ト） のア ドレス 

[返り 値] 



DO.L 

この 段落の バイ ト 位置/リザ ル ト コード 

AO.L 

段落 情報を 作成す る バッファへの ア ドレス 

[コール] 

pea 

columnPtr 


move.l 

# ypoint, -(sp) 


move.l 

# xpoint, -(sp) 


pea 

tEHdl 


SXCALL 

$A341 


lea 

16(sp),sp 


$A343 TMCalSelPoint 


tEHdl で 指定され た テキス ト エディツ トの 現在の 
セレ ク ト 領域の 行 位置と 座標を 再 計算す る。 

再配置が 発生す る。 

[引数] 


long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


pea 

tEHdl 


SXCALL 

$A343 


addq.l 

#4,sp 


SA345 TMSetView 


tEHdl で 指定 した テキスト エディツ トの ビュー レ 
ク タン グル として， viewRect です 旨定 した レク タング 
ルを 設定す る 0 
再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

viewRect 

レ クタ ン グルレ コー ドの アド 

レス 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


pea 

viewRect 


pea 

tEHdl 


SXCALL 

$A345 


addq.l 

#8,sp 


$A34B TMScroll 


tEHdl で 指定 した テキスト エディットを， dh, dv 
で 指定した ドット だけ 縦 •横に スクロール させ， 再 表 
示す る。 dh は 正で 右， 負で 左方 向へ， dv は 正で 下， 
負で 上方 向 にス クロ ー ルす る。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

dh 

水平 方向に スクロールさせる 

ドット 数 

long 

dv 

垂直 方向に スクロールさせる 

ドット 数 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


move.l 

# dv.-(sp) 


move.l 

# dh,-(sp) 


pea 

tEHdl 


SXCALL 

$A346 


lea 

l£(sp),sp 


$A347 TMPointScroll 


tEHdl で 指定した テキスト エディツ トの ビュー レ 
ク タング ルに， xpoint ypoint で 指定した 座標が 収 
まるよう にス クロ ー ル させ， 再 表示す る。 

再配置が 発生す る。 
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テキス ト マネージャ 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコ 

への ハン ドル 

long 

xpoint 

水平 座標 ( ローカル 座標） 

long 

ypoint 

垂直 座標 ( ロー カ ル 座標） 

[返り 値] 

DO.L 

リ ザル トコ 

-ド 

[コール] 


move.l 

# ypoint, -(sp) 


move.l 

# xpoint,-(sp) 


pea 

tEHdl 


SXCALL 

$A347 


lea 

l£(sp),sp 


$A34B TMSt「2 


tEHdl で 指定され た テキス ト エディット レコード 
の 編集 テキストの セレクト 領域を， textPtr で 指定 
し た 文字列 と 置き換え， 編集 履歴 レコ ー ドを 作成す る。 
カーソル 位置の 再 計算は 行われない 0 
再 表示は 行わない。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコー ド 

への ハン ドル 

long 

textPtr 

テキス トへの ポインタ 

long 

length 

テキス トの バイ ト 数 

long 

hisRecPtr 

編集 履歴 レコ ー ドの ア ドレス 

[返り 値] 

DO.L 

リ ザル トコ ー 

- K 


=0 

編集し なかった 


=1 

編集した 

[コール] 


pea 

hisRecPtr 


move.l 

# length, -(sp) 


pea 

textPtr 


pea 

tEHdl 


SXCALL 

$A348 


lea 

16(sp),sp 


$A349 TMKeyT oAsk 


eventRec で 指定した イベント レコードに 格納され 
ている キー コードを ， tEHdl で 指定した テキスト エ 
デイ ッ トレ コードの ファンク シヨ ン キー アサイ ンテー 
ブルに よって 変換し， イベント レコードに 再 設定す る。 


[引数] 

long 

tEHdl 

テキス ト エディッ ト レコー ド 

への ハン ドル 

long 

eventRec 

イベント レコー ドの アドレス 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 


=-1 

キー コー ドが 格納され ていな 

1 \ 


=-2 

い 

該当する コー ドが アサイン 
テーブルに 登録され ていない 

[コール] 


pea 

eventRec 


pea 

tEHdl 


SXCALL 

$A349 


addq.l 

#8,sp 


$A34A TMNextCode 


次の キー ダウン イベントを 先 読みし， tEHdl で 指 
定 した テキス トエ デイ ット レコードの キー アサイン 
テーブル によって キー コードを 変換した 後， code で 
指定した キー コードで あるか どうか チェック する。 指 
定 した コードであった 場合， mode に 0 以外を 指定す 
ると， この イベントを 取り除く。 


[引数] 


long 

tEHdl 

テキス ト エディ ット レコー ド 

への ハン ドル 

word 

code 

キー コード 

=0 すべての コード 

word 

mode 

=0 イベントを 取り除かない 
在 0 イベントを 取り除く 

[返り 値] 

DO.L 

上位 ヮード 

: キー コード 


下位 ワード 

: ASCII コード 


= 0 

指定した コー ドの キー イ ベン 

卜は 発見で きなかった 

[コール] 


move.w 

# mode,-(sp) 


move.w 

# code ,-(sp) 


pea 

tEHdl 


SXCALL 

$A34A 


addq.l 

#8,sp 
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$A34B TMSetTextH 

tEHdl で 指定した テキス ト エディットに， textHdl 
と length で 指定 した テキスト を 編集 用に セットす 
る。 再 表示は 行わない。 

疑似 ハン ドルは 不可。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ トレ コード 

への ハン ドル 

long 

textHdl 

テキス トへの ハン ドル 

long 

length 

テキス トの バイ ト 数 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


move.l 

# length.-(sp) 


pea 

textHdl 


pea 

tEHdl 


SXCALL 

$A34B 


lea 

l£(sp)，sp 


$A4B0 TMNextCodeln 


次の キー ダウン イベントを 先 読みし， tEHdl で 指 
定 した テキス トエ デイ ット レコードの キー アサイン 
テーブル によって キー コードを 変換した 後， code で 
指定した キー コードで あるか どうか チヱ ック する。 指 
定 した コードを 含む イベントが 発生す るまで， すべて 
の キー ダウン イ ベン トを 取り除く。 


[引数] 


long 

tEHdl 

テキス ト エディツ ト レコー ド 

への ハン ドル 

word 

code 

キ ー コ ー ド 

=0 すべての コード 

[返り 値] 

DO.L 

上位 ワード 

: キー コード 


下位 ワード 

: ASCII コード 


=0 

指定 した コ ー ドの キ ー イ ベン 

卜は 発見で きなかった 

[コール] 


move.w 

# code -( sp ) 


pea 

tEHdl 


SXCALL 

$ A 460 


addq.l 

#6 ，sp 


$A4B2 TMSelReverse 

tEHdl で 指定した テキス ト エディツ トの 
selStart， selEnd で 指定した 範囲を 反転 表示す る 0 
ハイ ライ ト 表示 属性が 負の 場合は 何も しない。 
再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコー ド 

への ハン ドル 

long 

selStart 

開始 位置 (バィ ト 位置） 

long 

selEnd 

終了 位置 (バィ ト 位置） 

[返り 値] 

DO.L 

リ ザル トコ 

—ド 

[コール] 


move.l 

# selEnd.-(sp) 


move.l 

# selStart, -(sp) 


pea 

tEHdl 


SXCALL 

$A462 


lea 

12(sp)，sp 


$A463 TMTini 


テキス ト マネージャの 終了 処理を 行う。 

再配置が 発生す る。 

[引数] 

なし 

[返り 値] 

DO.L リ ザル ト コード 

$A4B4 TMSetSelCal 

tEHdl で 指定され た テキス ト エディ ット レコード 
の 編集 テキストの セレクト 領域を， selStart selEnd 
で 指定し た 領域に あらたに 設定し， 全体を 計算し 直す。 
再 表示は 行わない。 selOffset は， 前の セレクト 位 
置の 開始 位置， あるいは 終了 位置を 指定す る。 開始 位 
置を 変更す る 場合は 前の 開始 位置を， 終了 位置を 変更 
する 場合は 前の 終了 位置を 指定す る。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディット レコー ド 

long 

selStart 

への ハン ドル 

セレ ク ト 範囲の 先頭 位置の 才 


フ セット 

セレ ク ト 範囲の 終端 位置の 才 
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long 


selEnd 


テキス ト マネージャ 


フ セット 

long selOffset 前の セレクト 位置の オフセット 

[返り 値] 

DO.L リ ザル トコー ド 

[コール] 

move.l # selOffset, -(sp) 

move.l # selEnd.-(sp) 

move.l # selStart.-(sp) 

pea tEHdl 

SXCALL $A364 

lea 16(sp),sp 

$A465 TMActivate2 

tEHdl で 指定した テキス ト エディ ッ トの ハイ ライ 
卜 表示 レベルを +1 して， カーソルを 表示， あるいは 
セレ ク ト 領域を 反転 表示す る 0 
再配置が 発生す る。 

[引数] 

long tEHdl テキス ト エディッ ト レコード 

への ハン ドル 

[返り 値] 

DO.L リザルト コード 

[コール] 

pea tEHdl 

SXCALL $A465 

addq.l #4,sp 

$A46B TMDeactivate2 

tEHdl で 指定した テキス ト エディット について， 
カーソルを 消去， あるいは セレクト 領域を 反転 表示を 
消した 後， ハイライト 表示 レベルを -I する 0 
再配置が 発生す る。 

[引数] 


long 

tEHdl 

テキス ト エディ ット レコー ド 

への ハン ドル 

[返り 値] 

DO.L 

リ ザル トコ 

— ド 

[コール] 


pea 

tEHdl 


SXCALL 

$A466 


addq.l 

#4,sp 


$A4B7 TMCheckSel 


tEHdl で 指定 された テキス ト エディツ トレ コード 


の 編集 テキストの セレクト 領域を selStart， selEnd 
で 指定した 領域に あらたに 設定し， 再 表示を 行う。 
selOffset は， 前の セレクト 位置の 開始 位置， ある 
いは 終了 位置を 指定す る。 開始 位置を 変更す る 場合は， 
前の 開始 位置を， 終了 位置を 変更す る 場合は 前の 終了 
位置を 指定す る。 カーソル 位置の 再 計算は 行わない。 
再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディッ ト レコード 

への ハン ドル 

long 

selStart 

セレ ク ト 範囲の 先頭 位置の 才 

フ セット 

long 

selEnd 

セレ ク ト 範囲の 終端 位置の 才 

フ セッ ト 

long 

selOffset 

前の セレ ク ト 位置の オフセット 

[返り 値] 

DO.L 

リザルト コ 

-ド 

[コール] 


move.l 

# selOffset, -(sp) 


move.l 

# selEnd, -(sp) 


move.l 

# selStart, -(sp) 


pea 

tEHdl 


SXCALL 

$A467 


lea 

16(sp),sp 


$A468 TMCalPoint2 


tEHdl で 指定 した テキスト エディットの offset で 
指定した バイ ト 位置の 座標を 計算し， buffPt]： に 返 
す。 

バッファ に 返される 情報の 形式は 以下の とおり。 


+$00.L 

水平 座標 

+$04 丄 

垂直 座標 

+ $08.L 

行 揃えの ための 補正 値 


再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

offset 

バィ ト 位置 

long 

buffPtr 

座標 情報が 返る バツフ ァ (12 
バイ ト） のア ドレス 

[返り 値] 

A0.L 

座標 情報が 返る バッファの ア ドレス 
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[コール] 

pea buffPtr 

move.l # offset , -( sp ) 

pea tEHdl 

SX 〇 ALL $ A 468 

lea 12( sp),sp 

$A46A TM 旧 Zen 

tEHdl で 指定 した テキスト エディットの of f set で 
指定した バイ ト 位置が シフト JIS コードの 何 バイト 
目 かを 調べる。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコー ド 

long 

offset 

への ハン ドル 

バィ ト 位置 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 


= 0 

シフ ト JIS コー ドの 1 バイ 


=1 

卜 @ 

シフ ト JTS コー ドの £ バイ 

AO.L 

卜 目 

指定され た 位置の テキス トの ア ドレス 

[コール] 


move.l 

# offset, -(sp) 


pea 

tEHdl 


SXCALL 

$A46A 


addq.l 

#8，sp 


$A46 日 TMSetDestOffset 


tEHdl で 指定 した テキスト エディットの， ビュー 
レク タング ルに 対する デイ ステ イネ ーシ ヨン レク タン 
グルの オ フ セットと して offsetx , offsety を セット 
し， 再 表示す る。 

再配置が 発生す る。 


[引数] 



long 

t-EHdl 

テキス ト エディツ ト レコード 

への ハン ドル 

long 

offsetx 

水平 座標 オフセット 

long 

[返り 値] 

offsety 

垂直 座標 オフセット 

DO.L 

[コール] 

リ ザル トコ 

ー ド 


move.l it offsetx .-( sp ) 

pea tEHdl 

SXCALL $ A 46 B 

lea 12( sp),sp 

$A46C TMGetDestOffset 

tEHdl で 指定した テキスト エディットの， ビュー 
レク タン グル に対する デイ ステ イネ ー シヨ ンレク タン 
グルの オ フセッ トを， buffPtr で 指定し たバ ッフア 
に 返す。 

パ、 ッ ファに 返される 情報の 形式は 以下の とおり 0 



+$00丄 

水平 座標 オフセット 



+ $04 .L 

垂直 座標 オフセット 


[引数] 




long 

tEHdl 

テキス ト エディツ ト レコード 



への ハン ドル 


long 

buffPtr 

結果が 返る バッファ (8 バイ 



卜） のア ドレス 


[返り 値] 




A 0 .L 

結果が 返る バッファの ア ドレス 


[コー ル] 

pea 

buffPtr 



pea 

tEHdl 



SXCALL 

$ A 46 C 



addq.l 

#8 ,sp 


$A4BD TMGetSelect 


tEHdl で 指定した テキス ト エディッ トの 現在の セ 
レクト 状態を buffPtr で 指定した バッファ に 返す。 

バッファ に 返される 情報の 形式は 以下の とおり。 


+$00 .L 

セレクト 開始 位置 



+$04 .L 

セレ ク ト 終了 位置 



+ $08 .L 

現在の セレ ク ト 位置 



[引数] 

long tEHdl テキス ト エディツ ト レコー ド 

への ハン ドル 

long buffPtr 結果が 返る バッファ (12 バイ 

卜） のア ドレス 

[返り 値] 

DO.L リ ザル ト コード 

AO.L 結果が 返る バッファの ア ドレス 

- [コール] 


296 


move.l 


# offsety , -( sp ) 


テキス ト マネージャ/タスク マネージャ 


pea buffPtr 

pea tEHdl 

SXCALL $ A 46 D 

addq.l #8 ,sp 

ライブラリ TMEventW 

tEHdl で 指定した テキス ト エディット に 格納され 
ている グラフ ポート レコードへの ポインタ 
( telnPort ) がウ インド ウレ コー ドへの ポイ ンタ であ 
ると 仮定し， アップデート リージョンの 範囲 内を 再 描 
画し， 再 描画した 範囲は アップデート リージョンから 
取り除く 0 その後， $ A 31 C TMEvent と 同様な 処理 
を 行う。 

アツ プ デー トリー ジョ ンを 操作す る ので， $ A 20 D 
WMUpdate 後には 使用で きない。 

再配置が 発生す る。 


[引数] 

long 

tEHdl 

テキス ト エディツ ト レコー ド 

への ハン ドル 

long 

eventRec 

イベント レコードの アドレス 

[返り 値] 

D 0 .L 

リ ザル トコ 

—ド 


=0 

編集し なかった 


=1 

編集した 

[コール] 


pea 

eventRec 


pea 

tEHdl 


jsr 

TMEventW 


addq.l 

#8 ,sp 


ライブラリ TMUpDateExist 

tEHdl で 指定した テキス ト エディット に 格納され 
ている グラフ ポ ー ト レコ ー ドへの ポイ ンタ 
( telnPort ) が ウイ ンド ウレ コー ドへの ポイ ンタ であ 
ると 仮定し， アップデート リージョンの 範囲 内を 再 描 
画し， mode が 0 以外の 場合は 再 描画した 範囲を アッ 
プ デート リージョンから 取り除く。 

アッ プデー トリー ジョン を 操作す る ので， $ A£OD 
WMUpdate 後には 使用で き ない。 

再配置が 発生す る。 

[引数] 

long tEHdl テキス ト エディット レコード 

への ハン ドル 

long mode =0 描画した 範囲を アップ 

デー ト リージ ョ ン から 
取り除かない 

右 0 描画した 範囲を アップ 
デート リージ ヨ ン から 
取り除く 

[返り 値] 

D 0 .L リ ザル ト コード 

= 0 アップデート リージョンが 存 

在し ない 

=1 アップデート リージョンを 描 

画した 

[コール] 

move.l # mode -( sp ) 

pea tEHdl 

jsr TMUpDateExist 

addq.l # 8 ,sp 
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$A414 • 

eventRec で 指定 した タスク マネージ ヤイ ベント レ 
コードの 内容と， Hmodel ， Hmode 2 を， taskID で 
指定した タスクに イベントと して 発生させる。 

指定した タスク マネージ ヤイ ベン トレ コードの 夕 
グ， whom あるいは whom 2 に 格納 さ れ ている 引数が 
ハンドル であり， タスク マネージ ヤイ ベン トレ コード 


を 廃棄す る 際， それらが^ •す ブロックを 同時に 廃棄し 
て もよ い 場合， Hmodel あるいは Hmode 2 に 0 以外 
を 指定す る。 

再配置が 発生す る。 

[引数] 

long tsEventRec タスク マネー ジャイ ベン トレ 

コー ドの ア ドレス 
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byte 

hmodel 

ハン ドル モ ー ド 1 

byte 

Hmode2 

ハン ドル モ _ ド 2 

word 

taskID 

タスク ID 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


move.w 

# taskID ,-(sp) 


move.w 

# Hmodel * $100+ Hmode2,-(sp) 


*byte で スタック 操作は できない 
pea eventRec 

SXCALL $A414 
addq.l #8，sp 

$A415 TSPostEventTsk2 

mesl, mes2， what2 で 指定 した データを， それ 
ぞれ タグの whom， whom£, what2 に 持つ ような 夕 
スク マネージ ャイ ベント レコードを 作成し， taskID 
で 指定した タスクに イベント として 発生させる。 この 
イベントの 種類は 12 (E_SYSTEM1) に 固定。 

whom あるいは whom2 に 格納 さ れ ている 引数が ハ 
ン ドルで ある 場合， Hmodel あるいは HmodeE に 0 
以外を 指定す ると， 別の ブ ロック を 作成して whom, 
whom2 が 指す ブロックの 内容を コピーす る。 タスク 
マネージャの イベント キューに 登録され る タスク マ 
ネー ジャイ ベント レコードの タグ whom, whom2 に 
は 新しく 作成した ブロ ック への ハン ドルが 格納され 
る 0 この場合， タスク マネージ ャイ ベント レコードを 
廃棄す る 際， これらの ブロックは 同時に 廃棄され る。 

再配置が 発生す る。 


[引数] 

long 

mesl 

メ ツセー ジ 1 

long 

mes2 

メ ツ セージ 2 

word 

what£ 

タスク マネー ジャイ ベント 

コード 

byte 

Hmodel 

ハン ドル モード 1 

byte 

Hmode£ 

ハン ドル モード 2 

word 

taskID 

イベント を 発生させる タスク 

の ID 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


move.w 

# tasklD-(sp) 


move.w 

# Hmodel * $100+Hmode2,-(sp) 


* byte で スタック 操作は で きない 


move.w 

# what2.-(sp) 


pea mes£ 

pea mesl 

SXCALL $A 415 
lea 14(sp),sp 

$A416 • 

$A3P4 TSFindTskn の 下請け ルーチン 0 削除 さ 
れた タスク や ロードした だけの タスク， そして， 終了 
後 メモリ から 削除され ていない タスクに ついて も 検索 
する こ とがで きる。 

[引数] 


long 

namePtr 

タスク 名を 示す 文字列 (ASCIIZ) の 

アドレス 

word 

taskID 

タスク ID 

[返り 値] 

DO.L 

タスク ID (下位 ワー ドの み 有効）/ リザルト 

コード 

[コール] 


move.w 

# tasklD-(sp) 


pea 

namePtr 


SXCALL 

$A 416 


addq.l 

#6,sp 


$A417 TSAnswer 


tsEventRec で 指定した イベント レコードの 内容 
を， タスク 間 通信に 対する 返事と して 通信 相手の タス 
クに 返す。 

再配置が 発生す る。 

[引数] 

long tsEventRec タスク マネージ ヤイ ベン ト レ 

コー ドの ア ドレス 

[返り 値] 


DO.L 

= 0 

正常終了 


=-1 

通信 中では ない 

[コール] 

=-2 

宛先の タスク の 準備が 整って 

いない 


pea 

tsEventRec 


SXCALL 

$A 417 


addq.l 

#4,sp 


SA418 TSSendMes 


listener で 指定した タスクに， tsEventRec で 指 
定 した タスク マネージ ヤイ ベン ト レコードの 内容を 
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メッセージと して 送信す る。 返事が あった 場合は， 
tsEventRec の 中に 返事が 返る。 

再配置が 発生す る。 


[ 引数 ] 

word 

long 


lintener 宛先 となる タスクの ID 

tsEventRec タスク マネージ ヤイ ベン ト レ 


SA41A TSInitTskS 

タスク マ 3 、ー ジャ 以下の マ；^ 、ー ジャ を， すべて 初期 
化する 0 $A34C TSInitTsk との 違いは， rscfile に 
よって システム リ ソースファイルを 指定で き る 点。 
rscfile が 0， あるいは 先頭 1 バイ トが 0 の 場合， デ 
フ オルトの SYSTEM.LB が 使用され る。 また， 実 




コー ドの ア ドレス 

際に オー 

プン した フ アイ ル 名が rscfile に 格納され 

[ 返り 値 ] 



る。 



D0.L 

= 0 

正常終了 





=2 

返事が 届いた 

[ 引数 ] 




=-1 

宛先の タスクが 存在し ない/ 

long 

memStart 

ヒープ ゾーン 先頭 ア ドレス 



通信 中 

long 

memEnd 

ヒープ ゾーン 終了 ア ドレス 


=-z 

宛先の タスク の 準備が 整って 

long 

path 

カレント パス を 示す 文字列の 



いない 



ア ドレス (ASCIIZ) 

[ コール ] 



byte 

model 

シェルの リ リース 番号 (1 〜） 


pea 

tsEventRec 

byte 

mode£ 

システム リ ソース ヒープ ゾー 


move.w 

# listener.-(sp) 



ン 作成 フラグ 


SX 〇 ALL $A418 



=0 作成し ない 


addq.l 

#6,sp 

word 

long 


右 0 作成す る 

$A419 TSGetMes 

ver 

rscfile 

シエ ルの バ ー ジョン 

システム リソー ス名 (ASIIZ) 

tsEventRec で 指定した タスク マネージ ヤイ ベン 



(フ ァイ ル 名が 返る ので 90 

ト レコ ー 

ドに メ ツセ- 

-ジを 読み込む。 mode で 0 を 指 



バイ ト 必要） 

定 した 場合は， 相手には -2 (「宛先の タスクの 準備が 

[ 返り 値 ] 



整って いない j) が， 

0 以外を 指定した 場合は 0 (「正 

DO.L 

ヒープ ゾー 

ンのア ドレス/リザ ル ト コード 

常 終了」） 

が 返る。 


AO.L 

システム リ ソースへの ハン ドル 

起動 直後に メッセ 

ージを 受けつ ける 場合に 使用す 

[ コール ] 



る。 




pea 

rsciile 





move.w 

# ver.-(sp) 

[ 引数 ] 




move.w 

# model * $100 + mode£,-(sp) 

long 

tsEventRec タスク マネージ ヤイ ベン ト レ 


*byte で スタック 操作は できない 



コー ドの ア ドレス 


pea 

path 

word 

mode 

=0 受けつ けなかった こと 


pea 

memEnd 



にす る 


pea 

memStart 



在 0 受けつ けた ことを 通知 


SXCALL 

$A41A 



する 


lea 

20(sp),sp 


[ 返り 値 ] 


メ ッ セージは 届いて いない 
メ ッ セージを 受け取った 


$A41F SXCallWindMS 

$A3A£ SXCallWindM と 同様な 処理を 行う c 


[ コール ] 

move.w # mode.-(sp) 

pea tsEventRec 

SX 〇 ALL $A419 

addq.l # 6，sp 


rectPtr で 指定す る レク タング ルで ウ インド ウサイ 
ズ 変更 時の 最大 サイズ， 最小 サイ ズを 指定で き る 点が 
異なる。 左上の 座標が 最小 サイズ， 右下の 座標が 最大 
サイ ズを 意味す る。 

再配置が 発生す る。 
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[引数] 



long 

winPtr 

ウインドウ レコードの ア ドレス 

long 

tsEventRec タスク マネージ ヤイ ベン ト 



レコー ドの ア ドレス 

long 

rectPtr 

レク タング ル レコ ー ドの アド 



レス 

[返り 値] 



D0.L 

ウィンドウの ノ \° — トコ ー ド/リザ ル トコ ー ド 

[コール] 

pea 

rectPtr 


pea 

tsEventRec 


pea 

winPtr 


SXCALL 

$A41P 


lea 

l£(sp),sp 


$A420 TSBeginD 「 ag2 


pt で 指定した ボイ ント から ドラッグを 開始す る。 $ 
A38A TSBeginDrag とは， ラバー バン ド 表示 ルー 
チンを 指定で きる 点で 異なる。 procPtr で 0 を 指定 
すると， 標準の ラバー バンド 表示 ルーチンが 使用され 
る 力 ? ， この場合は アイコン 管理 レコード のみ サポート 
される。 

あらかじめ グラフ ポートを セット して おく 必要が ある。 

ラバー バン ド 表示 ルーチンへは， 次の よう な パラ 
メータが A0 経由で 渡される。 


(aO). L 

ドラ ツグ レコ ー ドへの ポイ ンタ 

4 (aO). W 

コマンド 

6 (aO). 1 

TSBeginDrag£ で 指定した 


パラ メータ 


コマンドには 「初期 イ 1：」， 「表示 j ， 「消去」， 「終了」 
の 4 つが 存在し， その 仕様は 以下のと おり。 

• command=0 : 初期化 

最初に 一度 だけ 呼ばれる。 標準の ラバー バン ド 表示 
ルーチンでは ビッ ト イメージの 作成が 行われる。 

• command =1 : 終了 

終了 時に 呼ばれる。 初期化 時に 確保した メモリの 廃 
棄 等を 行う。 

• command =£ : 表示 

ラバー バンドを 表示す る。 ドラッグ レコードの 
drOrigin を 引数に して GMSetHome を コールす る 
ことで， 移動した 分の ローカル 座標が セット される。 

• command=3 : 消去 

ラバー バンドを 消去す る。 ドラッグ レコードの 
drOrigin を 引数に して GMSetHome を コールす る 


ことで， 移動した 分の ローカル 座標が セット される。 


[引数] 



long 

pt 

ドラ ッ グ 開始 位置 (グロ ーバ 
ル 座標） 

long 

procPtr 

ラバー バン ド 表示 ルーチンの 

アドレス 

long 

param 

ラバー バン ド 表示 ルーチンに 

渡される パラメータ 

[返り 値] 

D0.L 

リ ザル トコ 

— ド 

[コール] 


move.l 

# param, -(sp) 


pea 

procPtr 


move.l 

# Pt.-(sp) 


SXCALL 

$A420 


lea 

l£(sp),sp 


$A421 • 


strZPtr で 指定 された 文字列の 中から パス 名で 使 
用され る キャラクタ （•¥’， ' /\ \ ') を 探し出 

す 。 

[引数] 

long strZPtr 文字列 (ASCIIZ) の アドレス 

[返り 値] 

DO.L =0 発見で きた 

=1 発見で きなかった 

A0.L 発見した アドレス 

[コール] 

pea strZPtr 

SXCALL $A4£1 

addq.l # 4,sp 

$A422 SXGetVector 

intNo で 指定した SX コールの ベクタを 返す。 

[引数] 


word 

intNo 

SX コール 番号 

[返り 値] 



DO.L 

ベクタの 内容/リザ ル ト コード 

AO.L 

べク タの 内容 

[コール] 

move.w 

# intNo.-(sp) 


SXCALL 

$A422 


addq.l 

#2,sp 
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SA423 SXSetVector 

intNo で 指 定 した SX コールの ベクタと して 
vector を 設定す る。 

[引数] 

word intNo SX コール 番号 
long vector 登録す る アドレス 

[返り 値] 

DO 丄 ベクタの 内容/リザ ル ト コード 
AO.L ベクタの 内容 

[コール] 

pea vector 

move.w # intNo , -( sp ) 

SXCALL $ A 423 
addq.l # 6 ,sp 

SA424 • 

ISRec で 指定した アイ コン 管理 レコードで 描画 さ 
れる アイコンの， ファイル 名を 表示すべき 領域を 示す 
レク タング ルを buffPtr に 返す。 描画すべき アイコ 
ンの イメージを 収めた リソースが 読み込まれ， その リ 
ソース タイプが DO に， ハンドルが A 0 に 返る。 

再配置が 発生す る。 

[引数] 


long 

ISRec 

アイコン 管理 レコー ドの アド 



レス 

long 

buffPtr 

レ クタ ン グルが 返る バッファ 
(8 バィト） 

[返り 値] 



D 0 丄 

アイコンの イメージが 収められ ている リ 

ソース タイプ 

A 0 .L 

アイコンの イメージが 収められ ている メモ 


リ 上の リソ 

ース への ハン ドル 

[コール] 

pea 

buffPtr 


pea 

ISRec 


SXCALL 

$ A 424 


addq.l 

#8 ，sp 


$A425 • 


メモリ 中に 読み込ま れた X タイ プの 実行 ファイル 
を リロ ケートし， BSS セクションを クリアす る。 

[引数] 


long 

codePtr 

コー ド 部の 先頭 ア ドレス 

long 

headPtr 

X タイ プ 実行 ファ イ ルへ ツ 
ダ 先頭 ア ドレス 

long 

ofsPtr 

オフ セツ ト テーブル 先頭 アド 

レス 

[返り 値] 

DO.L 

リサ ル トコ— 

_ K 

AO.L 

BSS セ クシ 

ョ ン 末尾 +1 

[コール] 


pea 

ofsPtr 


pea 

headPtr 


pea 

codePtr 


SXCALL 

$ A 425 


lea 

l £( sp),sp 


SA426 • 


blklPtr , blklLen で 示 される ブロックの 中の 
insOfs で 示される 場所に， blk £ Ptr ， blk £ Len で 
示される ブロックを 挿入す る。 その 際， insOfs にも 
とも と あった 部分を dstOfs で 示される 場所に 転送す 
る。 


[引数] 

long 

blklPtr 

メモリ ブロック への ポインタ 

long 

blklLen 

メモリ ブロ ックの サイズ 

long 

insOfs 

ブロック 2 を 挿入す る オフ 

セット 

long 

dstOfs 

挿入す る 部分を 転送す る オフ 

セット 

long 

blkSPtr 

挿入す る ブロック への ポ インタ 

long 

blkSLen 

挿入す る ブロックの サイズ 

[返り 値] 

DO.L 

ブロック 転送した バイ ト 数 

[コール] 


move.l 

# blk £ Len ,-( sp ) 


pea 

blklPtr 


move.l 

# dstOfs , -( sp ) 


move.l 

# insOfs , -( sp ) 


move.l 

# blklLen -( sp ) 


pea 

blklPtr 


SXCALL 

$ A 4£6 


lea 

24( sp),sp 


$A427 TSCellToStr 


celHdl で 指定した セル リスト から 文字列を 抽出 
し， buffPtr で 指定した バッファに 返す。 max で 指 
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定し たバ ッ ファの サイ ズを 超え た 場合， エラーと なる。 
buff Ptr として 0 を 指定した 場合， ヒープ 上に 再 配 
置 可能 ブロックを 作成して， そこに 収めて ハンドルを 
A0 に 返す。 

再配置が 発生す る。 


[引数] 



long 

celHdl 

セル リス トへの ハン ドル 

long 

buffPtr 

結果が^る バッファの ア ドレス 

long 

max 

バッファの サイズ 

[返り 値] 



D0.L 

文字列の バイ ト 数/ リ ザル ト コード 

A0.L 

文字列を 収めた バッファへの ハン ドル (確 


保し なかつ 

た 場合は 0) 

[コール] 




move.l 

# max.-(sp) 


pea 

buffPtr 


pea 

celHdl 


SXCALL 

$A427 


lea 

l£(sp)，sp 


SA42B • 


celHdl で 指定した セル リスト から 文字列を 抽出 
し， buffPtr で 指定した バッファに 返す。 max で 指 
定し たバッ ファの サイ ズを 超え た 場合， エラーと なる。 
buff Ptr として 0 を 指定した 場合， ヒープ 上に 再 配 
置 可能 ブロックを 作成して， そこに 収めて ハンドルを 
A0 に 返す。 セル リストに アイコン 管理 レコードが 含 
ま れて いる 場合は フルパスの フ アイ ル 名 を 抽出す る。 
再配置が 発生す る。 


[引数] 



long 

celHdl 

セル リス トへの ハン ドル 

long 

buffPtr 

結果が 返る バッファの ア ドレス 

long 

max 

バッファの サイズ 

[返り 値] 



DO.L 

文字列の バイ ト 数/ リ ザル ト コード 

AO.L 

文字列を 収めた バッ ファへの ハン ドル (確 


保し なかつ 

た 場合は 0) 

[コール] 




move.l 

# max.-(sp) 


pea 

buffPtr 


pea 

celHdl 


SXCALL 

$A4£8 


lea 

12(sp)，sp 


$A429 • 

ShMBHdl で 指定 した シェル 用 メニュー テン プ 
レートの， itemNo で 指定す る アイテム の 表 ボ 文字列 
を itemNamePtr に， 実行 フ アイ ル 名を fileNamePtr 
に 返す。 また， 機能 番号が 設定され ている 場合は DO 


に 返る。 



[引数] 



long 

ShMEHdl 

シェル 用メ ニュ ー テン フレ ー 



卜への ハン ドル 

word 

itemNo 

アイテム 番号 

long 

itemNamePtr 



表示 文字列 (ASCIIZ) が 返る 

バッファの ア ドレス 

long 

fileNamePtr 



実行 ファイル 名 (ASCIIZ) が 
返る バッファの ア ドレス 

[返り 値] 



DO.L 

= 0 

ファイル 名 等を コ ピーした 


右 0 

機能 番号 

[コール] 

pea 

fileNamePtr 


pea 

itemNamePtr 


move.w 

# itemNo, -(sp) 


pea 

ShMEHdl 


SXCALL 

$A4£9 


lea 

14(sp),sp 


$A42A SXLockFSX 


SX-SYSTEM を ロックす る。 

[引数] 

なし 

[返り 値] 

なし 

$A42B SXUnlockFSX 

SX-SYSTEM を アン ロッ ク する。 

[引数] 

なし 

[返り 値] 

なし 
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$A42C TSFockMode 

fileName で 指定 した フ アイ ルを $A353 FockB で 
起動した 場合の 起動 モードを 調べる （起動す る わけで 
はない）。 dFileName と fileName は， 同じ ものを 
指定しても よい。 

再配置が 発生す る。 


[引数] 

long 

fileName 

フ ァイ ル 名 (ASCIIZ) の アド 

レス 

long 

dFileName 

実際に 起動され る ファイル 名 
が 返る バッファ (90 バイト） 

[返り 値] 

DO 丄 

=0 

フ アイ ルから 起動 


=1 

リ ソー スタ イプ CODE から 

起動 


=2 

メモリ 中の タスクを 複写して 

起動 

A0.L 

複写す る タスクの ID/ リ ソース CODE の 

ID 

[コール] 


pea 

dFileName 


pea 

fileName 


SXCALL 

$A42C 


addq.l 

#8，sp 


SA42D • 


fileName で 指定 した 名前と 同じ 名 前を 持つ タスク 
が 存在す るか どうか 調べる。 

[引数] 


long 

fileName 

ファイル ネー ム (ASCIIZ) の 

アドレス 

[返り 値] 

DO.L 

上位 ワード： 

現在の タスクの 状態 


下位 ワード： 

タスク ID/ リザ ル ト コード 

AO.L 

タスク 管理 テ 

•ー ブルの ア ドレス 

[コール] 


pea 

fileName 


SXCALL 

$A42D 


addq.l 

#4,sp 


$A42E • 

OfsPt で 指定し た 値を 画面の スクロール レジスタ 
(テキスト， グラフ イ ッ ク〇〜 3 ページ〉 に 代入し， ハー 
ドウ エア スクロールを 行う。 

[引数] 


long 

OfsPt 

水平. 垂直に ス クロ ー ルす る 

オフセット を 意味す るポ イン 

L 

[返り 値] 


r 

なし 

[コール] 

move.l 

# ofsPtr(sp) 


SXCALL 

$A4£E 


addq.l 

#4,sp 


$A42F • 


現在の スクロール レジスタの 値を 返す。 ただし， ス 
クロール レジスタは 読み出しが できない ので， sx - 
SYSTEM 内部に 保存して ある， 前回 設定した 値を 
読み出し ている。 

[引数] 

なし 

[返り 値] 

DO.L 水平. 垂直に スク ロールす る オフセットを 
意味す る ポイント 

SA430 TSSetGraphMode 

タスク マネージャを 初期化す る 際に 参照 される 画面 
モードを SRAM に 設定す る。 

scrMode は 10 CS $10 _GRTM0D で 指定す る 
値と 同等。 rmode として 0 以外を 指定す ると， 実 画 
面 モードと なる。 

[引数] 


word 

rmode 

0 以外で 実 画面 モー 

word 

scrMode 

画面 モード 

[返り 値] 

DO.L 

リ ザル トコ 

_ ド 

[コール] 


move.w 

# scrMode-(sp) 


move.w 

# rmode.-(sp) 


SXCALL 

$A430 


addq.l 

#4,sp 


303 


第 5 章 SX コールリ フ アレンス 


$A431 TSGetGraphMode 

タスク マネージャの 画面 モー ドを 得る。 

[引数] 

なし 

[返り 値] 

DO.L SRAM に 設定され ている 画面 モード 
上位 ワード： 0 以外で 実 画面 モード 
下位 ワード： 画面 モード 

AO.L グラフ ィ ック マネージャを 初期化した 値 
上位 ワード： 0 以外で 実 画面 モード 
下位 ワード： 画面 モード 
=-1 グラフィック マネージャは 初 

期 化されて いない 

$A432 SXGetDispRect 

rectPtr で 指定 した レク タング ルレ コードに 現在 
の 表示 画面を 返す。 実 画面 モードの 場合， 表示 画面と 
実際に 描画を 行う 実 画面は 異なる。 

[引数] 

long rectPrt レク タング ル レコー ドの アド 

レス 

[返り 値] 

なし 

[コール] 

pea rectPtr 

SXCALL $A432 
addq.l #4,sp 

$A433 • 

taskID で 指定 した タスク ID を 持ち， tick で 指定 
した システム 時刻に 起動され た タスクの 状態を 返す。 

[引数] 


long 

tick 

システム 時刻 

word 

taskID 

タスク ID 

[返り 値] 

D0.L 

タスク の 状態 


=-1 

エラー 

[コール] 


move.w 

# taskID, -(sp) 


move.l 

# tick-(sp) 


SXCALL 

$A433 


addq.l 

#6,sp 
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$A434 • 

ISRec で 指定した アイ コン 管理 レコードの 内容に 
したがって アイコンを 描画す る。 rectPtr で 指定し 
たレク タング ルレ コー ドに， フ アイ ル 名を 表示すべき 
領域を 示す レク タング ルを 返す 0 
再配置が 発生す る。 


[引数] 




long 

ISRec 

アイコ ン 管理 レ コー 

ドの アド 



レ ス 


long 

rectPtr 

レ クタ ン グル レコー 

ドの アド 



レス 


[返り 値] 




DO.L 

リ ザル トコ 

ー ド 


[コール] 

pea 

rectPtr 



pea 

ISRec 



SXCALL 

$A434 



addq.l 

#8,sp 



$A435 SXSRAMVer 


SRAM を 初期化した SX-SYSTEM の バージョン 
を 得る。 

[引数] 

なし 

[返り 値] 

D0.L バージ ョ ン (SX1 ユ〇の 場合は 1, それ 以前 
は 0) 

SA436 SXSRAMReset 

SRAM の， SX-SYSTEM が 使用す る 領域を 初期 
化する。 

[引数] 

なし 

[返り 値] 

なし 

$A437 SXSRAMCheck 

SRAM に 記録され てい る 情報の バージョン を 調 
ベ， 自分より 古い 場合は 初期化を 行う。 

[引数] 

なし 


タスク マネージャ/ グラフィック マネージャ 


[返り 値] 

DO.L =0 自分と 同じ バージョン なので 

初期化を 行わなかった 
=1 初期化を 行った 

= 2 自分よ り 新しい バージョンな 

ので 初期化を 行わなかった 

ライブラリ TSSet Abort — 

ハードウェア エ ラーが 発生し た 場合に 実行す るア 
ボート 処理 ルーチンを 設定す る。 エラーが 発生した 場 
合， exit 〇 で 終了す る 前に アボート 処理 ルーチンが 
( * procPtr) (-8194, param) のかたち で 呼び出 
される。 

〇 でコ ン パイルし たプ ログ ラ ム でのみ 有効。 


[引数] 

long 

procPtr 

アポ ー ト 処理 ルー チンの アド 

レス 

long 

param 

アポ ー ト 処理 ルー チンに 渡さ 
れる パラメー タ 

[返り 値] 

D0.L 

前の 処理 ルーチンの ア ドレス 

[コール] 


move.l 

# param, -(sp) 


pea 

procPtr 


jsr 

TSSetAbort 


addq.l 

#8,sp 


グラフ イツ クマ ネー ジヤ 


$A16C GMlmgT oRgn 

bitmapPtr で 指定 さ れたビ ツト マツ プの rectPtr 
で 指定され た 範囲 内で， カラー コードが 0 以外の 領 
域を 求め， rgnHdl で 指定した リー ジョンに 収める。 
ビッ ト マップが テキス ト タイプの 場合は アクセス ペー 
ジが 参照され る。 

再配置が 発生す る。 


[引数] 




long 

rgnHdl 

リージ ョ ンレ コー ドへの ハン 



ドル 


long 

bitmapPtr 

ビッ ト マップ レコ ー 

ドの アド 



レス 


long 

rectPtr 

レク タング ルレ コー 

ドの アド 



レス 


[返り 値] 




DO.L 

リザルト コー 

- K 


AO.L 

リ ージ ヨン レコー ドへの ハン ドル 


[コール] 





pea 

rectPtr 



pea 

bitmapPtr 



pea 

rgnHdl 



SXCALL 

$A16C 



lea 

12(sp),sp 



$A178 GMFrameArc 

rectPtr, startAngle, endAngle で 指定され た 
円弧の 枠を 描画す る。 

スクリプトに 記録され る。 

リージョンに 記録され る。 

[引数] 

long rectPtr 円弧が 内接す るレク タン グル 

レコ ー ドの ア ドレス 

word startAngle 開始 角度 
word endAngle 終了 角度 
[返り 値] 

D0.L リ ザル トコー ド 

[コール] 

move.w # endAngle, -(sp) 
move.w # startAngle, -(sp) 
pea rectPtr 

SXCALL $A178 
addq.l #8,sp 

$A179 GMFillArc 

rectPtr, startAngle, endAngle で 指定され た 
円弧の 内部を 塗り潰す。 

スクリプト に 記録され る。 

リ ー ジョンに 記録され る。 
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[引数] 


long 

rectPtr 

円弧が 内接す るレク タング ル 



レコ ー ドの ア ドレス 

word 

startAngle 開始 角度 

word 

endAngle 

終了 角度 

[返り 値] 



D0.L 

リ ザル トコ ■ 

ー ド 

[コール] 

move.w 

# endAngler(sp) 


move.w 

# startAngle.-(sp) 


pea 

rectPtr 


SXCALL 

$A179 


addq.l 

#8,sp 

$ A 17 C GMFramePoly 

polyHdl で 指定した ポリ ゴンの 枠を 描画す る。 
スクリプトに 記録され る。 

リージョンに 記録され る。 

[引数] 

long 

[返り 値] 

polyHdl 

ポリ コン レコ ー ド への ハンドル 

D0.L 

リ ザル トコ 

ー ド 

[コール] 

pea 

polyHdl 


SXCALL 

$A17C 


addq.l 

#4,sp 

$ A 17 D GMFillPoly 

polyHdl で 指定した ポリ ゴンの 内部を 塗り潰す。 
スクリプトに 記録され る。 

リ ー ジョンに 記録され る。 

[引数] 
long 
[返り 値] 

polyHdl 

ポリ ゴン レコ ー ドへの ハンドル 

D0.L 

リ ザル トコ . 

ー ド 

[コール] 

pea 

polyHdl 


SXCALL 

$A17D 


addq.l 

#4,sp 


SA 19 E GMOpenPoly 


ポリゴンの 記録を 開始す る。 ドロー レベルが -1 さ 
れ， 以降 実行され る GMLine で 描画した 座標が 記録 
される。 
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再配置が 発生す る。 

[引数] 

なし 

[返り 値] 

D0.L リ ザル ト コード 

$ A 19 F GMCIosePoly 

ポリゴンの 記録を 終了し， polyHdl で 指定した ポ 
リ ゴン レコードに 結果を 返す。 polyHdl として 0 を 
指定す ると， グラフィック マネージャが ヒープ 上に 再 
配置 可能 ブロックを 作成し， そこに 結果を 収めて ハン 
ドルを 返す 0 
再配置が 発生す る。 

[引数] 


long 

polyHdl 

ポリ ゴン レコー ドへの ハン ドル 

[返り 値] 

DO.L 

リ ザル トコー 

K . 

AO.L 

ポリゴン レコ 

ー ドへの ハン ドル 

[コール] 


pea 

polyHdl 


SXCALL 

$A19P 


addq.l 

#4,sp 


$ A 1 A 0 GMDisposePoly 


polyHdl で 指定 した ポリゴン レコードを 廃棄す る。 

[引数] 

long polyHdl ポリ ゴン レコー ドへの ハンドル 

[返り 値] 

D0.L リ ザル ト コード 
[コール] 

pea polyHdl 

SXCALL $A1A0 
addq.l #4，sp 

SA 1 AB GMMapPoly 

srcRectPtr で 指定 された レク タン グル 上に ある 
polyHdl で 指定した ポリ ゴン を， destRectPtr 上に 
写像した 結果を polyHdl 内に 返す。 どちら かの レク 
タング ルが ヌ ルレ ク タング ルの 場合， 結果は ヌル ポリ 
ゴン となる。 

再配置が 発生す る。 

[引数] 


グラフ イツ クマ ネー ジヤ 


long polyHdl ポリ ゴン レコ ー ドへの ハンドル 
long srcRectPtr 写像 元の レク タン グル 
long destRectPtr 写像 先の レク タン グル 
[返り 値] 

DO.L 0 

AO.L ポリゴン レコー ドへの ハン ドル 

[コール] 

pea destRectPtr 

pea srcRectPtr 

pea polyHdl 

SXCALL $ A 1 A 8 
lea 12( sp),sp 

$A1B9 GMCopy StdProc 

gProcTbl で 指定した バッファに 標準 描画 エン ト 
リテー ブルを 作成 する。 

[引数] 


long 

gProcTbl 

描画 エントリ テ ー フルを 返す 
バッファ （$40 バイ ト） の アド 

レス 

[返り 値] 

D 0 .L 

0 


A 0 .L 

結果が 返る バッファの ア ドレス 

[コール] 


pea 

gProcTbl 


SXCALL 

$ A 1 B 9 


addq.l 

#4 ,sp 


$A1BB GMT ranslmg 


コー ドの ア ドレス 

long destBitmapPtr 

コピ ー 先の ビット マップ レ 
コー ドの ア ドレス 

long srcRectPtr コピー 元の レク タング ルレ 

コー ドの ア ドレス 

long destRectPtr 

コ ピー 先の レ クタ ン グルレ 
コー ドの ア ドレス 

[返り 値] 

DO.L リ ザル ト コード 

[コール] 

pea destRectPtr 

pea srcRectPtr 

pea destBitmapPtr 

pea srcBitmapPtr 

SXCALL $ A 1 BB 
lea 16( sp),sp 

$A1BC GMFillRImg 

rectlmgPtr で 指定 される テキス ト タイプ. 1 ペー 
ジ のレク タング ルイ メー ジ を， ペン モー ドに したがつ 
て 描画す る。 描画 位置は pt で 指定す る。 

再配置が 発生す る。 

[引数] 

long rectlmgPtr レク タング ルイ メージ レコー 

ドの ア ドレス 

long pt 描画 時に 左上と なる ポイント 

[返り 値] 


異なる タイプの スクリーン 間 （ srcBitmapPtr で 
指定 される ビッ ト マップから destBitmapPtr で 指 
定 される ビットマップ） で， ビット イメージの コピー 
を 行う。 コピー 元の ビット マッ プ 上の srcRectPtr 
で 示される レク タング ル 内部を， コピー 先の ビット 
マッ プ 上の destRectPtr で 示 される レク タン グル 内 
部に コピーす るが， 両レク タング ルの サイズが 異なる 
場合， 拡大 縮小が 行われる。 

コピー 先の ビットマップが カレントの 場合， グラフ 
ポー トレ クタ ン グル， ビジ ブル リージ ョ ンでク リッピ 
ン グが行 われる。 

再配置が 発生す る。 


DO.L リ ザル ト コード 
[コール] 

move.l # pt ,-( sp ) 

pea rectlmgPtr 

SXCALL $ A 1 BC 

addq.l #8 ,sp 

SA1BD GMFilllmg 

imgPtr で 指定 される テキスト タイプ .1 ページの 
イメージを， ペン モ ー ドに したがって 描画す る。 描画 
位置， 範囲は rectPtr で 指定す る 0 
再配置が 発生す る。 


[引数] 


[引数] 


long srcBitmapPtr 

コピー 元の ビッ ト マップ レ 


long imgPtr イメージ レコードの アドレス 

long rectPtr 描画 位置, 範囲を 示す レ クタ 
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ン グル レコー ドの ア ドレス 

[返り 値] 

DO.L リ ザル ト コード 

[コール] 

pea rectPtr 

pea imgPtr 

SXCALL $A1BD 

addq.l #8,sp 

SA 1 BE GMSIidedRgn 

srcRgnHdl で 指定 される リージョンを， pt で 指 
定 される 移動 量 だけ 相対 移動し， その 軌跡を 
destRgnHdl に リージョン として 返す。 

再配置が 発生す る。 


[引数] 



long 

destRgnHdl 

結果が 返る リ ー ジョ ン レコ ー 



ドへの ハン ドル 

long 

srcRgnHdl 移動す る リージョン レコード 



への ハン ドル 

long 

[返り 値] 

Pt 

移動 量を 意味す る ポイント 

DO.L 

リ ザル トコー 

- K 

[コール] 

move.l 

# Pt-(sp) 


pea 

rscRgnHdl 


pea 

destRgnHdl 


SXCALL 

$A1BE 


lea 

l£(sp),sp 


SA 1 BF GMPaintRgn 


bitmapPtr で 指定した ビ ッ トマ ッ プの pt で 指定し 
た ポイントの 周辺の 同じ 色の 領域を， rgnHdl で 指定 
された リージョンに 返す。 

再配置が 発生す る。 


move.l 

# Pt-(sp) 

pea 

bitmapPtr 

pea 

rgnHdl 

SXCALL 

$A1BP 

lea 

12(sp),sp 


$ A 1 CQ GMSetRgnLine 

リージ ョ 

ン データの 1 行の 最大 バイ ト 数を length 

に 設定す る 

。 length は 最大 $200 ま での 偶数で， 0 を 

指定す ると 

， 初期 状態に 戻る。 

[引数] 



word 

length 

リージ ヨ ン データの 1 行の 

最大値 

[返り 値] 



DO.L 

前の 最大値 


[コール] 

move.l 

# lenght,-(sp) 


SXCALL 

$A1C0 


addq.l 

#4,sp 

SA 1 C 1 GMGetRgnLine 

リージ ョ 

ン データの 1 行の 最大 バイ ト 数を 返す。 

[引数] 



なし 



[返り 値] 



DO.L 

現在 設定され ている 1 行の 最大 バイ ト 数 


$ A 1 C 2 GMInitGraphMode 


scrMode で 指定した 画面 モードに あわせて ビット 
マップ や グラフ ポート の 初期値を 設定す る。 scrMode 
で 指定す るのは， IOCS $10 _CRTM0D で 指定す 
る 値と 同等。 

[引数] 

word scrMode 画面 モード 
[返り 値] 

D0.L 
[コール] 


[引数] 

long 

rgnHdl 

結果が 返る リージョン レコ ー 

ドへの ハン ドル 

long 

bitmapPtr 

ビッ ト マップ レコー ドの アド 

レス 

long 

pt 

走査を 開始す る ポイント 

[返り 値] 

DO.L 

リザルト コー 

•ド 


リザルト コ ー ド 

move.w # scrMode, -(sp) 

SXCALL $A1C£ 
addq.l # 2，sp 


AO.L 結果が 返る リージョン レコ ー ドへの ハンドル 

[コール] 
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$A1C3 GMCurFont 

カレン ト グラフ ポー トと フォント レコードを 比較し 
て 状態が 変化して いる 場合は， フォント レコード をつ 
く り 直す。 

再配置が 発生す る。 

[引数] 

なし 

[返り 値] 

DO.L リ ザル ト コード 

AO.L フォン ト レコ ー ドへの ハン ドル 

$A1C4 GMGetScrnSize 

現在 設定され ている 画面の サイ ズを 返す。 

[引数] 

なし 

[返り 値] 

DO.L 画面の 縦横の サイ ズを 意味す る ポイント 

$A1C5 GMExgGraph 

$A131 GMSetGraph と 同様に， graphPtr で 指 
定 する グラフ ポートを カレントに する。 DO に それ ま 
での カレン ト グラフ ポー トのア ドレスが 返る 0 

[引数] 

long graphPtr グラフ ポー ト レコー ドの アド 
レス 

[返り 値] 

DO.L 0 

AO.L 前の カレン ト グラフ ポー トの アドレス 
[コール] 

pea graphPtr 

SXCALL $A1C5 
addq.l #4,sp 

$A1 C6 GMExgBitmap 

カレント グラフ ポートに bitmapPtr で 指定した 
ビットマップ レコードを セットす る。 A0 に それまで 
のビッ ト マップ レコードの ア ドレスが 返る 0 

[引数] 

long bitmapPtr ビッ ト マップ レコー ドの アド 

レス 


DO.L 0 

AO.L 前の ビッ ト マップ レコー ドの ア ドレス 

[コール] 

pea bitmapPtr 

SXCALL $A1C6 
addq.l #4,sp 

$A1C7 GMGetBitmap 

カレン トグラ フポー トに セット されて いる ビット 
マップ レコードの ア ドレスを 返す。 

[引数] 

なし 

[返り 値] 

DO.L 0 

AO.L ビッ ト マッ プレ コードの アドレス 

$A1C8 GMCalcBitmap 

bitmapPtr で 指定した ビッ ト マップ レコードの 内 
容を再 計算す る。 具体的には， bmKind， bmRect を 
もとにして， line, page を 計算す る。 


[引数] 



long 

bitmapPtr 

ビッ ト マップ レコ ー 



レス 

[返り 値] 



DO.L 

リ ザル トコ- 

- K 

AO.L 

ビッ ト マップ レコ ー ドの ア ドレス 

[コール] 

pea 

bitmapPtr 


SXCALL 

$A1C8 


addq.l 

#4,sp 


$A1C9 GMCalcScrnSize 

bitmapPtr で 指定した ビッ ト マップが 必要と する 
メモリの バイ ト 数を 計算す る。 

[引数] 

long bitmapPtr ビッ ト マップ レコードの アド 
レス 

[返り 値] 

DO.L ビッ ト マップが 必要と する バイ ト 数 

[コール] 

pea bitmapPtr 

SXCALL $A1C9 
addq.l # 4,sp 


[返り 値] 
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SA 1 CA GMNewBits 

rectPtr で 示した 大きさを 持つ， scrKind の タイ 
プの ピッツを 作成す る。 ピッツ 内の ビットマップ レ 
コードは， base を 除いて 初期化 される 0 ピッツ 内の 
イメージ データは 初期化され ない。 

再配置が 発生す る。 

[引数] 


word 

scrKind 

スクリーン タイプ 

long 

rectPtr 

ピッツの 大きさ を 示す レ クタ 
ン グルレ コー ドの ア ドレス 

word 

aPage 

アクセス ページ (テキス ト タ 
ィ プの 場合） 

[返り 値] 

D0.L 

リ ザル トコ 

ー ド 

AO.L 

ピッツへの ハン ドル 

[コール] 


move.w 

# aPage-(sp) 


pea 

rectPtr 


move.w 

# scrKind ,-(sp) 


SXCALL 

$A1CA 


addq.l 

#8,sp 


$ A 1 CB GMDisposeBits 


bitsHdl で 指定した ピッツ を 廃棄す る。 


[引数] 

long 

bitsHdl 

ピッツへの ハン ドル 

[返り 値] 

DO.L 

0 


[コール] 


pea 

bitsHdl 


SXCALL 

$A1CB 


addq.l 

#4,sp 


$ A 1 CC GMLockBits 


bitsHdl で 指定した ピッッを ロックし， ロック レ 
ベルを- 1 する。 

[引数] 

long bitsHdl ピッツへの ハン ドル 

[返り 値] 

DO.L リ ザル ト コード 
AO.L ピッツへの ハン ドル 

[コール] 



pea 

bitsHdl 


SXCALL 

$A1CC 


addq.l 

#4,sp 

$ A 1 CD GMUnlockBits 

bitsHdl で 指定 した ピッツを アンロックし， ロッ 

クレベルを +1 する。 


[引数] 
long 
[返り 値] 

bitsHdl 

ピッツへの ハン ドル 

D0.L 

リ ザル トコ 

—ド 

AO.L 

ピッツへの ハン ドル 

[コール] 

pea 

bitsHdl 


SXCALL 

$A1CD 


addq.l 

#4,sp 


$ A 1 CE GMItalicRect 


rectPtr で 指定 した レク タング ルを， イタリック 
の 文字を 傾ける のと 同じ だけ 傾け， カレント グラフ 
ポートに 描画す る。 描画 モードは フォント モードでは 
なく， ペン モードが 参照され る。 

[引数] 


long 

rectPtr 

レク タング ルレ コー ドの アド 

レス 

[返り 値] 

DO.L 

リ ザル トコ 

ー ド 

[コール] 


pea 

rectPtr 


SXCALL 

$A1CE 


addq.l 

#4,sp 


$ A 1 CF GMItalicRgn 


rectPtr で 指定 した レ クタ ン グルを， イタリック 
の 文字を 傾ける のと 同じ だけ 傾けた 領域を rgnHdl 
で 指定 された リージョン レコード に 返す 0 
再配置が 発生す る。 


[引数] 



long 

rgnHdl 

リ ージ ヨン レコ ー ドへの ハン 

ドル 

long 

rectPtr 

レク タング ルレ コー ドの アド 

レス 
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DO.L リ ザル ト コード 

AO.L リ ー ジョ ン レコ ー ド への ハンドル 

[コール] 

pea rectPtr 

pea rgnHdl 

SXCALL $A1CP 

addq.l #8,sp 

$A1D0 GMFreeBits 

bitsHdl で 指定した ビ ッツの ロック レベルを 強制 
的に 0 にして アン ロッ ク する。 

[引数] 

なし 

[返り 値] 

DO.L 0 

AO.L ピッツへの ハン ドル 


long 

destPtr 

結果が 収められる バッファの 

アドレス 

long 

srcPtr 

元の データの先頭 ア ドレス 

long 

[返り 値] 

srcLen 

元の データの バイ ト 数 

DO.L 

圧縮 結果の バイ ト 数/ リザルト コ ー ド 

AO.L 

結果が 収 めら れる バッファの 終端 + 1 

[コール] 

move.l 

# srcLen-(sp) 


pea 

srcPtr 


pea 

destPtr 


SXCALL 

$A1D2 


lea 

12(sp),sp 


$A1D3 GMUnpacklmage 


srcPtr, srcLen で 与えた 圧縮 データを， destPtr 
で 指定され たバッ ファに 展開す る 


SA1D1 GMCalcGraph 

graphPtr で 指定した グラフ ポー トに セットされ 
ている ビットマップの 情報を もとに， グラフ ポート レ 
コードの 内容を 再 計算す る。 ビジ ブル リージョン， ク 
リ ップ リージョン 等が 作成され ていなかった 場合， 作 
成す る。 

再配置が 発生す る。 

[引数] 


long 

graphPtr 

グラフ ポ ー ト レコ ー 

レス 

[返り 値] 

DO.L 

リ ザル トコ 

—ド 

AO.L 

グラフ ポー 

トレ コー ドの ア ドレス 

[コール] 


pea 

graphPtr 


SXCALL 

$A1D1 


addq.l 

#4.sp 


$A1DE GMPacklmage 


[引数] 



long 

destPtr 

結果が 収められる バッファの 

アドレス 

long 

srcPtr 

元の データの先頭 ア ドレス 

long 

[返り 値] 

srcLen 

元の データの バイ ト 数 

DO.L 

展開 前の バイ ト 数/ リザルト コード 

AO.L 

展開 前の バッファの 終端 +1 

[コール] 

move.l 

# srcLen-(sp) 


pea 

srcPtr 


pea 

destPtr 


SXCALL 

$A1D3 


lea 

12(sp),sp 


$A1D4 GMAdJustPt 


pt で 指定 した ポイントが rectPtr で 指定 した レク 
タング ル 内に 収まる ように 調整す る。 最初から レ クタ 
ン グルの 内部に ある 場合は 何も しない。 


srcPtr, srcLen で 与えた メモリ の 内容を ラン レ 
ン グス 法で 圧縮し， destPtr で 指定し たバ ッ ファに 
格納す る。 バイ ト 単位で 同じ データが 3 バイ ト 以上 
連続した 場合に 圧縮を 行う ので， £ 縮の 結果 得られる 
データの サイズは， 最悪の 場合 srcLen+ ( (srcLen 
+ 127) /127) バイ トと なる。 


[引数] 

long 

Pt 

ポイント 

long 

rectPtr 

レ クタ ン グル レコー ドの アド 

[返り 値] 
DO.L 

レス 

調整した 結果の ポイント 

[コール] 




[引数] 


pea 


rectPtr 
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move.l # pt ,-( sp ) 

SXCALL $ A 1 D 4 
addq.l #8 ,sp 


$A1D5 GMPutlmg 

imgPtr で 指定 した イメージを， カレント グラフ 
ポートの rectPtr で 指定され た 位置 と 大きさ で 描画 
する。 イメージの タイプは テキスト タイプ， 描画 モー 
ドは PSET に 固定。 描画 ページは カ レント ビット 
マツ プの アクセス ペー ジで 決定 される。 


[引数] 

long 

imgPtr 

イメージの ア ドレス 

long 

rectPtr 

レク タング ル レコ ー ドの アド 

レス 

[返り 値] 

D 0 .L 

リ ザル トコ 

— ド 

[コール] 


pea 

rectPtr 


pea 

imgPtr 


SXCALL 

$ A 1 D 5 


addq.l 

#8 ,sp 


$A1D6 GMCenterRect 


[返り 値] 


=-i 


する 

結果が ヌル レ クタ ン グルに 

なった 

正常終了 

エラー 


AO.L 

[コール] 


結果が 返る レク タング ルレ コードの アドレス 


move.w 

move.l 

pea 

pea 

SXCALL 

lea 


# mode -( sp ) 

# Pt -( sp ) 
srcRectPtr 
destRectPtr 
$A1D6 
14(sp),sp 


$A1D7 GMScrewRect 

rectPtr で 指定した レク タン グルを 外形 とする 擬 
似 ダイ ア ログを カレント グラフ ポート に 描画す る。 

レク タング ルと して （ xs ， ys ) - ( xe , ye ) を 指 
定 した 場合， ビスの 位置は （ xs +4， ysH -4) + (xs 
+ 14 ， ys + 14), ( xe -15, ys + 4) - ( xe -5, ys + 
14)， （ xs +4， ye -15 ) -(xs + 14， ye -5) , ( xe -15， 
ye -15) - ( xe -5, ye -5) の 4： 力 所と なる 0 


srcRectPtr で 指定す るレク タング ルの 中央に ， pt 
で 指定す る 大き さの レク タング ルを 作成し， 
destRectPtr に 格納す る。 srcRectPtr がヌ ルレ ク 
タング ルの 場合， 結果 も ヌル レク タング ルと なる 0 


[引数] 



long 

destRestPtr 

結果が 返る レ クタ ン グルレ 

コー ドの ア ドレス 

long 

srcRectPtr 

元になる レク タン グル レコ ー 

ドの ア ドレス 

long 

Pt 

新しくつ く るレク タング ルの 

大きさ 

word 

mode 

レク タング ルが はみ出した 場 

合の 処理 


=0 元になる レク タング ル 
と 新し くつく る レ クタ 
ン グルの 中心を あわせ 
る 

=1 新しくつ くる レク タン 
グルの 左上の 座標が 必 
らず 元の レク タング ル 
の 内側に 収まる ように 


[引数] 

long rectPtr レク タング ル レコー ドの アド 

レス 

[返り 値] 

D 0 .L リ ザル ト コード 

[コール] 

pea rectPtr 

SXCALL $ A 1 D 7 
addq.l # 4 ,sp 

SA1D8 GMAndRectRgn 

srcRectPtr で 指定した レク タング ルと 
srcRgnHdl で 指定 した リージョンの AND をと り， 
結果を destRgnHdl にリ ー ジョンと して 格納す る。 共 
通 部分がない 場合， 結果は ヌ ルリ ー ジョンと なる。 
再配置が 発生す る。 

[引数] 

long destRgnHdl 結果が 返る リージ ヨン レコー 

ドへの ハン ドル 

long srcRgnHdl リー ジョン レコー ドへの ハン 
ドル 
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long srcRectPtr レク タン グル レコー ドの アド 


ドル 


レス 

[返り 値] 

DO.L リ ザル トコー ド 

AO.L 結果が 返る リージョン レコ ー ドへの ハンドル 

[コール] 

pea srcRectPtr 

pea srcRgnHdl 

pea destRgnHdl 

SXCALL $A1D8 
lea 12(sp)，sp 

$ A 1 D 9 GMOrRectRgn 

srcRectPtr で 指定した レク タング ルと 
srcRgnHdl で 指定した リージョンの OR をと り， 結 
果を destRgnHdl に リージョンと して 格納す る。 
再配置が 発生す る。 


long srcRectPtr レク タング ル レコー ドの ア 
ドレス 

[返り 値] 

DO.L リザルト コード 

AO.L 結果が 返る リージョン レコー ドへの ハンド 
ル 

[コール] 

pea srcRectPtr 

pea srcRgnHdl 

pea destRgnHdl 

SXCALL $A1DA 
lea 12(sp)，sp 

$ A 1 DB GMXorRectRgn 

srcRectPtr で ネ旨定 した レク タング ノレと srcRgnHdl 
で 指定した リージョンの XOR をと り， 結果を 
destRgnHdl (: リージョンと して 格納す る。 


[引数] 



再配置が 発生す る。 


long 

destRgnHdl 

結果が 返る リージョン レコー 






ドへの ハン ドル 

[引数] 



long 

srcRgnHdl 

リージョン レコ ー ドへの ハン 

long 

destRgnHdl 

結果が 返る リージョン レコ ー 



ドル 



ドへの ハン ドル 

long 

srcRectPtr 

レク タング ルレ コー ドの アド 

long 

srcRgnHdl 

リージ ヨ ン レコー ドへの ハン 



レス 



ドル 

[返り 値] 



long 

srcRectPtr レク タング ルレ コードの ア 

DO.L 

リ ザル ト コー 

• K 



ドレス 

AO.L 

結果が 返る リ 

— ジョ ン レコ ー ド への ハン ドル 

[返り 値] 



[コール] 



DO.L 

リ ザル トコー 

. K 


pea 

srcRectPtr 

AO.L 

結果が 返る リ 

ー ジ ヨン レコ ー ド への ハン ドル 


pea 

srcRgnHdl 

[コール] 




pea 

destRgnHdl 


pea 

srcRectPtr 


SXCALL 

$A1D9 


pea 

srcRgnHdl 


lea 

l£(sp),sp 


pea 

destRgnHdl 

$ A 1 DA GMDiffRectRgn 


SXCALL 

lea 

12(sp),sp 


srcRgnHdl で 指定した リージョンの 内側で， 
srcRectPtr で 指定 した レク タン グルの 外側の 部分 
を 求め， その 結果を destRgnHdl に リージョン とし 
て 格納す る。 

再配置が 発生す る。 

[引数] 

long destRgnHdl 結果が 返 る リージョン レコー 

ドへの ハン ドル 

long srcRgnHdl リージョン レコードへの ハン 


$ A 1 DC GMCharKind 

ch で 指定した 文字の 種類を 返す。 存在し ない 文字 
コードを 指定した 場合， ミ ッ シング キャラクタ となり， 
全角 特殊と して 分類され る。 

文字コードの 分類は 以下の とおり。 


文字 種コ ■■ド 

文字の 種類 

コー ドの 範囲 

0 

半角 ASCII 

$00 〜 FF, $8000 〜 80FF 

1 

半角 外字 

$F400 〜 F5FF 
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2 

1/4 角 上付 

$F000 〜 FIFF 

3 

丨 /4 角 下付 

$F200 〜 F3FF 

4 

5 

全角 非 漢字 

$8I40 〜 84BE 

6 

全角 第 I 水準 漢字 

$889F 〜 989E 

7 

全角 第 2 水準 漢字 

$989F 〜 EB9E 

8 

全角 外字 

$EB9F 〜 EC9E 

9 

全角 特殊 

$84BF 〜 889E 
$F600 〜 FFFF 


加す る。 

[引数] 
long 
[返り 値] 
DO.L 
[コール] 


fLink フォン トリ ン クのア ドレス 

リ ザル ト コード 

pea fLink 

SXCALL $A1B0 

addq.l # 4,sp 


[引数] 


word 

ch 

文字 コー ド (ASCII コード/ 

cpz-MCii oivincmuvcnui il 



シフ ト JIS コード） 

fKind で 指定 した フォント カ インドと して 登録 さ 

[返り 値] 



れ ている フォント を 取り 外す。 

DO.L 

文字 種 コー 

K 


[コール] 



[引数] 


move.w 

# ch,-(sp) 

long fKind フォン ト カ インド 


SXCALL 

$A1DC 

[返り 値] 


addq.l 

#2,sp 

DO.L リサり レ ト コード 


$A1DD GMDiffRgnRect 

srcRectPtr で 指定した レク タン グルの 内側で， 
srcRgnHdl で 指定した リージョンの 外側の 部分を 求 
め， その 結果を destRgnHdl に リージョン として 格 
納 する。 

再配置が 発生す る。 


[コール] 


move.w # fKind.-(sp) 

SXCALL $A1E1 
addq.l # 2,sp 


$A1E2 GMGetFontLink 

フ オン トリ ンクの 先頭が 格納され ている アドレスを 





返す。 



[引数] 






long 

destRgnHdl 

結果が 返る リージョン レコー 

[引数] 





ドへの ハン ドル 

なし 



long 

srcRectPtr 

レ クタ ン グル レコー ドの ア 

[返り 値] 





ドレス 

DO.L 

フォント 

リ ンクの 先頭が 収められ ている ア 

long 

srcRgnHdl 

リージ ヨン レコ ー ドへの ハン 


ドレス 




ドル 

AO.L 

フォン ト 

リ ンクの 先頭が 収められ ている ア 

[返り 値] 




ドレス 



DO.L 

AO.L 

[コール] 


リザルト コ ー ド 

結果が 返る リージョン レコー ドへの ハンドル 


$A1E3 GMGetHProcTbl 

水平 描画の 初期化 ルーチンの テーブルを 返す 0 


pea 

srcRgnHdl 


pea 

srcRectPtr 

[引数] 

pea 

destRgnHdl 

なし 

SXCALL 

$A1DD 

[返り 値] 

lea 

12(sp),sp 

DO.L 

$A1E0 GMAddFont 

fLink で 指定 した フォント リンクを システムに 追 

AO.L 


水平 描画の 初期化 ルーチンの テーブルの ア 
ドレス 

水平 描画の 初期化 ルーチンの テー ブルの ア 
ドレス 
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$A1E6 GMGetStdProcTbl 

標準 描画 ルーチンの テーブルを 返す。 

[引数] 

なし 

[返り 値] 

DO.L 標準 描画 ルー チンの テー ブルの ア ドレス 
AO.L 標準 描画 ルーチンの テーブルの ア ドレス 

$A1E7 GMGetFontProcTbl 

文字 描画 ルーチンの テーブルを 返す 0 

[引数] 

なし 


[返り 値] 

DO.L 文字 描画 ルーチンの テーブルの ア ドレス 
AO.L 文字 描画 ルーチンの テーブルの ア ドレス 


$A1EB GMGetRgnProcTbl 

リージョン 1 行 演算 ルーチンの テーブルを 返す。 

[引数] 

なし 

[返り 値] 

DO.L リージ ョ ン 1 行 演算 ルーチンの テーブル 
のア ドレス 

AO.L リ ージョ ン 1 行 演算 ルー チンの テーブル 
のア ドレス 
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付録 デイ スグ SXer Tool Box 』 の 使い方 
SXl . lO / EasyPaint で 追加され た リソース 
リザ ル トコードー 覧 
SX コール 通巻 索引 


付録 ディスク r SXer Tool Box 」 の 使い方 


付録 ディ スタは 2 HD ， l .£ M バイ トの Human 標準 形式で フ オー マツ トされて いますので， 
Human , SX - WINDOW とも に 問題な く 使用で き ます 0 収められ ている ファイルの カテゴリー 
により， 階層 ディレクトリで、 分類して 収録して あります 0 


— C 開発 キット C 言語に よる SX アプリ ケーシ ヨン 開発 キット 
— INC ヘッダ ファイル 等 

— LIB ライブラリ 等 

— DOC 関数の リファレンス 等 


— Tools 基本的な 開発 ツール （アセンブラ， リンカ， リソース リンカ 

(いずれも フリー ソフ ト ウェア）） 

— SAMPLE I 「 SX - WINDOW プロ グラミ ング j 掲載の サンプル プロ グラム 

— SAMPLEJ r 追 補 版 SX - WINDOW プログラミング」 掲載の サンプル プログラム 

— Freesoftware フリー ソフ ト ウェア 


— LHA.X 高圧縮 書庫 管理 プログラム （フリーソフトウェア 展開 用） 

*— README この ディスク についての ドキュメント ファイル 


__ 。開発 キッ トに ついて 

付録 ディスクに 収録した C 言語に よる 開発 キットは， ヘッダ ファイル， ライブラリ， ドキュ 
メント で 構成され る もので， XC £ を お使いの 方には すぐに ご 利用いた だけます。 

¥〇 開発 キット 以下の フ ァイ ルは 圧縮 さ れて いま せんので， そのまま ご 利用いた だけます。 
インスト ー ルの 手順は 次の とおり です。 

(1) ディ レクト リ ¥ G 開発 キット ¥ INC の 中の ファイル すべてを， 場 境 変数 include で 示 
される インクルード サブ デ、 イ レクト リ に コピーす る。 

(£) ディレクトリ ¥ C 開発 キット ¥ LIB の 中の ファイル すべてを， 環境 変数 lib で 示され 
る ライ ブ ラリ サブ テ、、 イ レクト リにコ ピーす る。 
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付録 ディスク 「 SXerTool 巳 ox 」 の 使い方 


¥ C 開発 キット ¥ DOC の 中の ファイル （筆者が 作成した もの） は， 用意され ている 関数の 
リ ファレ ンス です。 プリ ンタで 印刷す るな どして ご 活用く ださい。 

なお， この 開発 キットは， シャープ 株式会社の ご 好意に より 収録 させて いただく ものです。 



サンプル プログラム について 


ディレクトリ ¥ SAMPLE _1， ¥ SAMPLE _2 以下の フ アイ ルは， それぞれ 『 SX - 
WINDOW プロ グラミ ン グ』， 『追 補 版 SX - WINDOW プロ グラミ ング』 に 収録した サン プ 
ル プログラムの ソース を 収録した も のです 0 

¥ SAMPLE _1， ¥ SAMPLE _2 以下の ファイルは 圧縮され ていません ので， そのまま ご 
利用いた だけます。 


基本的な 開発 ツールに ついて 


ディレクトリ ¥ T 00 Is 以下の ファイルは， SX アプリケーションの 開発に 最低限 必要な ア 
セン ブ 、ラ， リンカ， そして リソース リンカの セツ トです。 


• アセンブラ 

「ハイスピード アセンブラ • HAS 」 は YuNK 氏 （ハンドル 名） の 手に よる もので、， 糸 « 正の 
AS . X バージョン £ の 上位 互換です。 純正 アセンブラより も 高速で， いくつかの 便利な 機能 
が 付加され ています。 

• リンカ 

「ハイスピード リンカ . HLK 」 は SALT 氏 （ハンドル 名） 製作の もので， 純正の LKX 
バージョン 2 の 上位 S 換 です。 糸 屯 正 リンカ と 比較す る と 非常に 高速です。 

•リ ソース リ ンカ 

「 RLK 」 は 清水 和久氏 製作の もので， リソースの 追加， 抽出， 参照 等 力 河 能です 0 

Rh の ソフトウェアは いずれも フリーソフトウェアで、， LHA で IBig してあります。 

LH A は 高 Big * 庫 管理 プログラム， いわゆる アーカイバ、 で， 複数の ファイルを まとめて 圧 
縮 （サイズを 小さく する こと） する ための ツールです。 LHA によって 圧縮され た 複数の ファ 
イ ルは， 披? •に * LZH という 名前の ついた 1 つの ファイルに まとめられます 0 また， こう 
した ファイルは LHA を 使って 元の 複数の ファイルに 復元す る こ とがで きます 0 これを 展開， 
あるいは 解凍と 呼びます。 

ハイスピード アセンブラの 場合， HASE 34. LZH という ファイル 名で 収録され ています 0 
こ れを 展開す る 場合の 手順を 示 します。 


(1) あらかじめ フォーマットし ておいた 空 ディスクを 1 枚 用意して おきます。 これを ドラ 
イブ B に 入れます。 この デイ スタに ファイルが 展開され る こと になり ます。 ハード デイ 
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スタ や RAM ディスク でも かまいませんが， この場合， 以降に 示す ドライブ 名を， お 
手持ちの マシンの ドライブ 名 に 読み 替 えてく ださい。 

(2) 付^ ディスクを ドライブ A に 入れます 0 

(3) B : H 等で 展開す る ドライブに 移動す る。 

(4) A:¥LHA x A :¥ T 00 ls ¥ HAS 234 H と 入力す る。 これで LHA が 働きは じめ， ド 
ライブ B の 中に ハイスピード アセンブラと， それに 付随す る ドキ ュメン トフ アイ ル 等 
が 作成され ます。 


フリー ソフト ウェアに ついて 


ディレクトリ ¥ Freesoftware には 13 作品， 14 ファイルの フリーソフトウェアが 収め 
られ ています。 個々 の フリーソフトウェアに ついての 説明は， ディスク 中の README ド 
キュメ ントを 参照して くた * さい。 

これらの フリーソフトウェアは いずれも LHA で 圧縮して あります。 ご 利用に 際して は， 前 
節で' 示した 例の ようにして， 展開して ご 利用く ださい。 

付録 ディスク 「SXer Tool Box 」 には， 以下の フリーソフト ウヱア を 収録 させて いただ 
きました。 


HAS 234 .LZH 

YuNK 氏 （ハン ドル 名） 製作 

純正 アセンブラ AS . X と 上位 互換の アセンブラです。 アセンブル 速度が 向上して いる ほか， いくつか 
の 便利な 機能が 拡張され ています 

hlk 212.1 zh 

SALT 氏 （ハン ドル 名） 製作 

純正 リ ンカ LK . X と 上位 互換の リ ン カです。 リ ンク 速度が 大幅に 向上して います 

rscl 02 .lzh 

清水 和久氏 製作 

r oh ! Xj 誌’ 90 年丨 月 号の 付録 ディスクに 収録され ていた， 純正 リソース リンカ RLK と 上位 互換の リ 
ソース リ ン カです。 リ ソースの 取り出し 等の 機能が 拡張され ています 

cliplOO.Izh 

沖 @ 沖 氏 （ハン ドル 名） 製作 

グラフィックの カット & ペース トに 対応した クリ ッ プポー ドです 

HyperMenu.Izh 

DAI 氏 （ハン ドル 名） 製作 

SX - WIND 0 W 上の 機能を 登録し， 使いやすく 提供す る 階層 メニューを 実現す る ユー ティ リ ティーです 

neko 023 x.lzh 

neko 023 s.lzh 

ひどり 氏 （ハン ドル 名） 製作 

ウインドウ 内を 「猫」 が マウス カーソルを 追って 走り回る デスク アクセサリです 
neko 023 x . lzh には 実行 ファイル， neko 023 s . lzh には ソースが 収められ ています 

SXBGMI 40 .LZH 

GRANADA 氏 （ハンドル 名） 製作 

「サウンド . X 」 上位 互換の 0 PM / PCM ファイル 演奏 アクセサリです。 連続 演奏 等の 機能が 拡張され て 

います 
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SXcon 005.1 zh 

SALT 氏 （ハン ドル 名） 製作 

SX - WINDOW 上で Human の 標準 入出力を 利用で きる コンソールの ウイン ドウを 実現す る console . x ， そ 
こで command . x を 利用す るた めの shell . x が 収められ ています 

SXEVENTS 丄 ZH 

Arimac 氏 （ハンドル 名） 製作 

SX - W 丨 ND 0 W 上で 発生す る イベント を 監視し， その 内容を 表示す るた めの ユー ティ リ ティー です 

SXmxp 30 I.Lzh 

sxmxlvb 2 .Lzh 

さとし 氏 （ハン ドル 名） 製作 

SXmxp . X は フリー ソフ ト ウェアと して 広く 利用され ている 音楽 演奏 システム MXDRV の データを SX - 
WIND 0 W 上で 演奏させる ための アクセサリ。 sxmxIvb . X は， その 演奏 状態を 表示す る レベル メータの 

アクセサリです 


SXtask.Lzh 

0 UZAK 氏 （ハン ドル 名） 製作 

シェル 上で 動作す る タスクに ブレーク ポイント を 仕掛ける ツールです。 デバッガと 併用す る ことに 
より， シェ ル 上で 動作す る アプリケーションの デバ ッ グに 威力 を 発揮し ます 

Oplt 09 1 .Izh 

勝呂友 一氏 作 

実行 ファイルを 登録す る ことで， キー または メニュ —— 発で プロ グラムの 起動を 可能に する ユー ティ 

リ テイ ー です 


LHA X 624 .X 

岡 田 紀雄氏 作 

ルー ト に 収めら れた LHA . x の オリ ジナ ルアー カイ ブフ ァイ ルです。 自 己 解凍 フ ァイ ルと なって おり， 
この ファイルを 実行す ると、 ドキ ュメン トな どが 展開され ます 

mkBGI 20 .Lzh 

拙作 

512 X 512 ドット 65536 色の グラフィックを 4 階 調 変換し， SX - WINDOW の 背景と なる データを 作成す 
るユー テイ リテ イーです 

St 0 i 05 a.Lzh 

拙作 

実 画面 モー ドで SX - WINDOW の デスク ト ップを マウス ポインタに 追従して スクロールさせる ユー テイ 

リ テイ ー です 



ディスクの 著作権 等に ついて 


日本の 著作権法には 「著作権の 放棄」 という 概念がない ため， この ディスクに 収められ てい 
る 各 ファイルの 著作権は それぞれの ファイルの 作者 等に 帰属し ます 0 ただし， 各 ファイルの 著 
作 権 保持者は いずれも 再配布を 認めて いますので， この ディ スタは 自由に 複写して 再配布す る 
ことができます。 ただし， シャープ 株式会社から 提供され た C 開発 キットの 著作権は 同社が 
有し， フリーソフト ウェァで はない こと を お断わり して おき ます。 

サンプル プログラムに ついては， ご 自由に 改変し， SX-WINDOW への 理解を 深めて いた 
だければ 幸いです。 また， 改変して 作成した プログラムの 著作権は， 改変した 方に 帰属し ます。 

フリー ソフ トウ エアに ついては， 各 フリー ソフ トウ エア ごとに 作者からの ドキュメント ファ 
イ ルが 付属して いるは ずです ので， 再! 己 布 や 改変 等に 際して は， それらの ファイル をよ く 読み， 
従うよう にして くた ^ さい。 
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そのほか 


そのほか にも 重要な 情報が ディスク 中の README ファイル 中に 収められて いますので， 
ご 使用の 前には 必ず README ファイル も あわせて お読みく ださいます よう， お願いし ま 
す 0 
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SXl.lO/EasyPaint で 追加され た リソース 


SXU 0/Easy Paint で 追加され た リソース 


行末の マークは， この リ ソースが' 収められ ている リ ソースファイルを 示す。 


S 

SYSTEM.LB 

B 

1 

BUILTIN 丄 B 

ICON.LB 

C 

コン ト □ -ル .LB (旧 CTRLPNL.LB) 

E 

Easypaint. し B 


Easypaint で 使用され ている リ ソースに ついては， リ ソースの 意味と 使用され ている ID 
だけを 示す 0 


WDEF 

ウィン ドウ 定義 関数を 収める リ ソース 

49 タイトルの 広い 標準 ウィンドウ （クローズ ボタン， スクロール バー， サイズ 

ボタンを サポート） S 

MENU 

メニュー テン プレー ト を 収める リ ソース 

-4096 テキス ト エディット 用 ポップアップ メニュ ー S 

PRTD 

プリ ンタ ドライバを 収める リ ソース 

0 CZ 系 24 ピン S 

1 ESC/P 系 S 

2 PC-PR 系 S 

3 CZ 系 48 ピン S 

PRIC 

プリンタの レク タング ル イメージ （2 ページ） を 収める リソース 
(未使用） 

0 CZ 系 24 ピン S 

1 ESC/P 系 S 

2 PC-PR 系 S 

3 CZ 系 48 ピン S 

PrEV 

デフォルトの 印刷 環境 レコ ー ドの 内容を 収める リ ソース 

0 デフォルトの 印刷 環境 レコー ドの 内容 B 

ICN # 

アイコ ン 定義 レコ ー ドを 収める リ ソース 

165 Easypaint.X 1 

166 *.PNT 1 

167 Easyscan.X 1 

168 Easyprint.X I 

PAT 4 

3 ページの レク タング ル イメージ （マスク 付き） を 収める リソース 

222 E 

PAT 3 

2 ページの レク タング ル イメージ （マスク 付き） を 収める リソース 

165 Easypaint.X 1 

166 氺 .PNT 1 

Ib7 Easyscan.X I 

168 Easyprint.X I 

1000 E 
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PATE 

2 ページの レク タング ル イメージを 収める リソース 
-3155 画面 設定 

C 


-3156 キーボード 設定 

C 


-3157 マウス 設定 

C 


-3158 プリンタ 設定 

C 


-3159 スイッチ 設定 

C 


-3160 RS-232C 設定 

C 


-3161 タイマー 設定 

C 


-3162 印刷 環境 設定 

C 


-217 ボタン 

C 


-218 押された ボタン 

C 


1000 〜丨 005, 1010 〜 1022, 1040 〜 1057, 1060 〜 1067, 1100 

E 


2 17 〜 221， 223 〜 242， 250 〜 253 

E 

PAT1 

1 ページの レク タング ル イメージを 収める リ ソース 

1000, 1001 

E 

CODE 

プログラムを 収める リ ソース 
-3162 プリンタ 設定 

C 

CPNM 

タスク 名 （ASCIIZ) を 収める リソース 
-3155 画面 設定 

C 


-3156 キ ー ボ ー ド 設定 

C 


-3157 マウス 設定 

C 


-3158 プリンタ 設定 

C 


-3159 スイッチ 設定 

C 


-3160 RS-232C 設定 

C 


-3161 タイマー 設定 

C 


-3162 印刷 環境 設定 

C 

MCSR 

マウス ポインタの 形状を 収める リ ソース 

1000 〜 101 1 

E 

PaPT 

.ペン パターンを 収める リ ソース 

1000 

E 

Pa 巳闩 

ブラシ パターンを 収める リ ソース 

1000 

E 

PaSP 

スプレー パターンを 収める リ ソース 

1000 

E 

PaMS 

1000 

E 

PaDD 

Easypaint の 変更 可能な データ （文字列 等） が 収められる リソース 

1000 〜丨 005 

E 
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リザ ル ト コード ー篱 


I リザルト コード ー 麓 

”” で 囲んだ 文章は， リ ザ' ル トコ ー ドに 対応す る シェル 用 エラー タ M ア ログの 表示です。 


一般 


$00000000 正常終了 


$FFFFFFFF エラー 

メモリ マネ ー ジヤ 

ER_NOMEM 

$FFFFFC00 ヒープの 拡張に 失敗した 

ER OFFADR 

$FFFFFC0l 奇数 ア ドレスを 指定した 

ER ZONEID 

$FFFFFC02 ゾー ンへッ ダが 異常 

ER NILPTR 

$FFFFFC03 ポインタ が 空 （ NULL) 

ER_NILHDL 

SFFFFFC04 ハンドルが 空 （ NULL) 

ER EMPHDL 

SFFFFFC05 ハン ドルの 指して いる ブロ ックの サイズが 0 

ER NOTFRE 

$FFFFFC06 フリー ブロック でない 

ER NOTALO 

$FFFFFC07 ア ロケーテッ ド ブロック でない 

ER NOTNON 

$FFFFFC08 再配置 不能 ブロック ではない 

ER_NOTREL 

SFFFFFC09 再配置 可能 ブ ロック ではない 

ER—NOTLOC 

$FFFFFC0A ロック さ れた ブロック ではない 

ER 一 NOTUNL 

$FFFFFC0B ロ ック されて いない ブロック ではない 

ER_NOTPUR 

$FFFFFC0C パージ 可能 ブロ ック ではない 

ER_NOTUNP 

$FFFFFC0D パージ 不可能な ブロ ック ではない 

ERJLPROP 

SFFFFFC0E 属性の 指定が 異常 

ER_DIFTYP 

$FFFFFC0F フリー ブロック とア ロケ ー テッ ド ブロックを まとめよ うとした 


( 連続す る 2 つの ブロック の 種類が 異なる） 

ER_LESSIZ 

$FFFFFCI0 ヒープ ゾーンの 範囲 が 異常 

ERSPLIT 

$FFFFFCI 1 フリー ブロックの サイズが 足りない （ブロック 分割の 失敗） 

ER_SIZEPU 

$FFFFFCI2 パージ 可能 ブロ ックの サイズを 変更し よう とした 

リソース マネージャ 

ER—RSCNOTFND 

$FFFFF800 リ ソースを 発見で きなかった 

EREXISTTYPE 

$FFFFF7FF すでに その タイ プは 存在す る 

EREXISTID 

$FFFFF7FE すでに その タイプの ID は 存在す る 

ER_TYPENOTFND 

$FFFFF7FD この タイ プは 存在 しない 

ERJDNOTFND 

$FFFFF7FC この ID は 存在し ない 

ERJLLTYPE 

SFFFFF7FB タイプに ” ” を 指定した 

ERJLLID 

$FFFFF7FA ID に $ FFFF を 指定した 

ER 一 NILCURRENT 

$FFFFF7F9 カレン ト リソースが 設定され ていない 

ERNOTOPEN 

SFFFFF7F8 リ ソースは すべて メモリ 上に ある 


( ファイルが オープンされ ていない） 

ER_NILHANDLE 

$FFFFF7F7 ハン ドルが 空 

ER_HDLNOTFND 

$FFFFF7F6 この ハン ドルに 該当する リ ソースは ない 

ERCANTDETATCH 

$FFFFF7F5 ハン ドルが 正しく ない 
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テキス ト マネージャ 


TM EDITABORT 

$FFFFD800 

致命的な エラー が 発生し 編集 テキス ト を 廃棄した 

TM LINEOVER 

$FFFFD80I 

指定され たレク タン グルに 文字が 収 まらない 

TM LENOVER 

$FFFFD802 

テキス トの 最大 サイズを 超えた 

TM PROHIBITEDIT 

$FFFFD803 

リード オンリー で 編集で きない 

TM EDITERR 

$FFFFD804 

不正な 文字列を 入力した 

タスク マネージャ 


ER ABORT 

$FFFFDFFE 

ハー ドウ エア エラー による アポ ー ト 

ER OBJX 

$FFFFDFFF 

単独 実行の ファイル 

ER NOTHEAD 

$FFFFE000 

タスク マネージャ 上で 動作し ない ファイル 

ER NOTOBJECT 

$FFFFE00l 

実行 ファイル ではない 

ER NOTLOAD 

$FFFFE002 

ファイル オーブン エラー 

ER NOTPARA 

$FFFFE003 

同時に 複数 実行で きない フ ァイ ル 


$FFFFE004 

” ディスク の 書き込みが 禁止され てい ます。 コ ピーで き ません。" 


$FFFFE005 

n 読み込み 専用の ファイルです。” 


$FFFFE006 

•’ 同名の 読み込み 専用 ファイルが あり ます。 コ ピーで き ませ 
ん 〇” 


$FFFFE007 

1 売み 込み 専用の ファイルです。 変更で きません。” 


$FFFFE008 

"システム 属性の ファイルです。 移動/削除は できません。，’ 


$FFFFE009 

” 同名の システム 属性 ファイルが あり ます。 コ ピー でき ませ 
ん。” 

"システム 属性の ファイルです。 変更で きません。” 


$FFFFE00A 


$FFFFE00B 

” 同名の フ ァイ ルが あるので 削除 します。 よろし いです か？" 


$FFFFE00C 

"ドライブく DRVNAME > の 容量が く LENGTH > K バイ ト 不足し 
ています。” 


$FFFFE00D 

ファイル 名が 正しく ない 


$FFFFE00E 

•，同名の ファ イ ルが 存在 します。” 


$FFFFE00F 

"アイコン データに 変更が あり ます。 ファイルに 保存し ます 
か?” 


$FFFFE0I0 

”終 了し ます。” 


$FFFFE01 1 

元の 場所では ない 


$FFFFE0I2 

"メモリの 空き 容 置が あり ません。 ウィンドウを クローズして 
く ださい。” 


$FFFFE0I3 

” メモリの 空き 容量が あり ません。 ウィン ドウを 丨 つ クロー ズ 
します!！ 


$FFFFE0I4 

"ディスクの 書き込み が 禁止 されて います。” 


$FFFFE0I5 

” 複数の ファイルは 同時に 実行で き ません。” 


$FFFFE0I6 

” メモリ 容量が 足り ま せん 終了 します。” 


$FFFFE0I7 

"ディ レクト リが 作成で きません。” 


$FFFFE0I8 

” ファイルの 書き込みに 失敗し ま した。” 


$FFFFE0I9 

” オープン 中の ファイルが あり ます。” 


$FFFFE0IA 

"ウィンドウを クローズし なければ， 強制 終了し ます” 


$FFFFE0IB 

"メモリ 容量が 足り ま せん 再起動 します。” 


$FFFFE0IC 

"メモリの 空き 容 置に 余裕が でき ま した。" 


$FFFFE0ID 

” パス 名が 長す ぎます。 （64 バイ トまで)” 


$FFFFE0IE 

”リ ソースの 読み込みに 失敗し ま した。” 

ERFILENOTFND 

$FFFFE0IF 

ファイルが 見つからない 

ERSERCH BREAK 

$FFFFE020 

ファイル 検索が 中断され た 


$FFFFE02I 

指定 された フ ァイ ルが みつから ない/ 1 ドライ ブ 検索した 


$FFFFE022 

ドライ ブの 準備が で きていない 
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SX コール 通巻 索引 


前著 『SX-WINDOW 〜』 の 第 4 章 および 本書の 第 5 章に 掲載され ている SX コールの 通巻 
索引です。 索引の 中で 使われて いる 記号の 意味は 次のと おりです。 


I …… 『SX-WINDOW 〜』 の 掲載 ページ 

II …… 本書の 掲載 ページ 

◎ …… SX1.10 になっ て 仕様が 変更 また は 新設 さ れたコ ー ル 

(ページ 数） …… SX1.02 では 未 公開であった が SX1.10 にな り 正式に 公開され た 
コールが 『SX-WINDOW 〜』 で 解説され ている ページ 


コール 番号 順 索引 


$A000 

MMInitHeap 

I 315 

$A023 

MMChPurge 

1320 

$AOOI 

MMGetCurrentHeap 

1315 

$A024 

MMChMelt 

1320 

$A002 

MMSetCurrentHeap 

I 315 

$A025 

MMChReserve 

I 321 

$A003 

MMNewHandle 

I 315 

$A026 

MMChFreeSize 

1321 

$A004 

MMSetHandleSize 

I 315 

$A027 

MMChGrowHeapGet 

I 321 

$A005 

MMDisposeHandle 

I 315 

$A028 

MMChGrowHeapSet 

1321 

$A006 

MMGetHandleSize 

1316 

$A029 

MMChPurgeGet 

1321 

$A007 

MMH し ock 

I 316 

$A02A 

MMChPurgeSet 

I 321 

$A008 

MMHUnlock 

I 316 

$A02B 

MMChCompactGet 

I 321 

$A009 

MMNewPtr 

I 316 

$A02C 

MMChCompactSet 

I 321 

$AOOA 

MMDisposePtr 

1316 

$A02D 

MMPtrNew 

I 321 

$AOOB 

MMGetPtrSize 

1316 

$A02E 

MMPtrHeap 

I 322 

$AOOC 

MMSetPtrSize 

I 316 

$A02F 

MMPtrDispose 

I 322 

$AOOD 

MMCompactMem 

I 317 

$A030 

MMPtrSizeGet 

I 322 

$AOOE 

MMHeapInit 

I 317 

$A03I 

MMPtrSizeSet 

I 322 

$AOOF 

MMBIockMstGet 

I 317 

$A032 

MMPtrPropGet 

I 322 

$AOIO 

MMMemCompact 

I 317 

$A033 

MMPtrPropSet 

I 322 

$AOI 1 

MMMemPurge 

I 317 

$A034 

MMMstAI locate 

I 323 

$A0I2 

MMMemMelt 

I 318 

$A035 

MMMstBind 

I 323 

$A0I3 

MMMemReserve 

I 318 

$A036 

MMHdINew 

I 323 

$A0I4 

MMMemSizeFree 

I 318 

$A037 

MMHdIHeap 

I 323 

$A0I5 

MMMemSizeComp 

I 318 

$A038 

MMHdIDispose 

I 323 

$A0I6 

MMMemSizePurge 

I 318 

$A039 

MMHdISizeGet 

I 323 

$A0I7 

MMMemSizeMelt 

I 318 

$A03A 

MMHdISizeSet 

I 324 

$A0I8 

MMMemErrorGet 

I 319 

$A03B 

MMHdIEmpty 

I 324 

$A0I9 

MMMemErrorSet 

I 319 

$A03C 

MMHdIRealloc 

I 324 

$AOIA 

MMMemStrictGet 

1319 

$A03D 

MMHdIMoveHi 

I 324 

$AOIB 

MMMemStrictSet 

I 319 

$A03E 

MMHdIPropGet 

I 324 

$AOIC 

MMChGet 

1319 

$A03F 

MMHdIPropSet 

I 324 

$AOID 

MMChSet 

1319 

$A040 

MMHdILock 

1325 

$AOIE 

MMChPtrNew 

1319 

$A04I 

MMHdlUnlock 

1325 

$AOIF 

MMChMstMore 

I 320 

$A042 

MMHdIPurge 

I 325 

$A020 

MMChMstNew 

I 320 

$A043 

MMHdINoPurge 

I 325 

$A02I 

MMChHdINew 

I 320 

$A044 

MMHdl Resource 

I 325 

$A022 

MMChCompact 

1320 

$A045 

MMHdINoResource 

I 325 
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$A046 

MMHdllns 

1326 

$A047 

MMHdIDel 

I 326 

$A048 

MMBIockUsrFlagGet 

I 326 

$A049 

MMBIockUsrFlagSet 

I 326 

$A04A 

MMBIockUsrWordGet 

I 326 

$A04B 

MMBIockUsrWordSet 

I 326 

$A04C 

MMMemAmiTPeach 

I 327 

$A04D 

MMMemHiReserve 

I 327 

$A04E 

MMPtrBlock 

I 327 

$A04F 

MMHdIBIock 

I 327 

$A050 

MMHdIMstGet 

I 327 

$A05I 

MMChHiReserve 

I 328 

$A052 

MMChUsrFlagGet 

I 328 

$A053 

MMChUsrFlagSet 

I 328 

$A054 

MMChUsrWordGet 

I 328 

$A055 

MMChUsrWordSet 

I 328 

$A068 

EXEnVDISPST 

I 328 

$A069 

EXDeVDISPST 

I 328 

$A06A 

MSInitCsr 

I 329 

$A06B 

MSShowCsr 

I 329 

$A06C 

MSHideCsr 

I 329 

$A06D 

MSSetCsr 

I 329 

$A06E 

MSObscureCsr 

I 329 

$A06F 

MSShieldCsr 

I 329 

$A070 

MSGetCurMsr 

I 330 

$A07I 

MSMultiGet 

I 330 

$A072 

MSMultiSet 

I 330 

$A073 

EXAnimStart 

I 330 

$A074 

EXAnimEnd 

I 330 

$A075 

EXAnimTest 

I 330 

$A086 

KBMapGet 

I 331 

$A087 

KBShiftGet 

I 331 

$A088 

KBShiftSet 

I 331 

$A089 

KBSimulate 

I 332 

$A08A 

KBScan 

I 332 

$A08B 

KBGet 

I 332 

$A08C 

KB Empty 

I 331 

$A08D 

KBInit 

I 331 

$A08E 

KBTini 

I 331 

$A08F 

KBCurKbrGet 

I 332 

$A090 

KBOIdOnGet 

I 332 

$A09I 

KBOIdOnSet 

I 332 

$A092© 

KBFIagGet 

11275 

$A093© 

KBFIagSet 

11275 

$A09A 

KMEmpty 

I 333 

$A09B 

陽 Post 

I 333 

$A09C 

KMAscJobSet 

I 333 

$A09D 

KMSimulate 

I 333 

$A09E 

KMTask 

I 333 

$A09F 

KMInit 

I 333 

$AOAO 

KMTini 

I 334 

$AOAI 

KMCurKmrGet 

I 334 


$A0A2 

EMInit 

1334 

$A0A3 

EMTini 

I 334 

$A0A4 

EMSet 

I 334 

$A0A5 

EMGet 

I 335 

$A0A6 

EMScan 

1335 

$A0A7 

EMMSLoc 

1335 

$A0A8 

EMLBttn 

I 335 

$A0A9 

EMRBttn 

I 335 

$A0AA 

EMLStill 

I 335 

$A0AB 

EMRStill 

I 335 

$A0AC 

EMLWait 

I 335 

$A0AD 

EMRWait 

I 336 

$A0AE 

EMKMapGet 

I 336 

$A0AF 

EMSysTime 

I 336 

$A0B0 

EMDCIickGet 

I 336 

$A0BI 

EMBIinkGet 

I 336 

$A0B2 

EMClean 

I 336 

$A0B3 

EMMaskSet 

I 336 

$A0B4 

EMDTTskSet 

I 336 

$A0B5 

EMDCIickSet 

I 337 

$A0B6 

EMBIinkSet 

I 337 

$A0B7 

EMEnCross 

I 337 

$A0B8 

EMDeCross 

I 337 

$A0D9 

RMInit 

I 337 

$A0DA 

RMTini 

I 337 

$A0DB 

RMResNew 

I 337 

$A0DC 

RMRscAdd 

I 337 

$A0DD 

RMRscRemove 

I 338 

$A0DE 

RMTypeRemove 

1338 

$A0DF 

RMResDispose 

I 338 

$A0E0 

RMResOpen 

I 338 

$A0EI 

RMRscGet 

I 338 

$A0E2 

RMResClose 

I 338 

$A0E3 

RMResRemove 

I 339 

$A0E4 

RMCurResSet 

I 339 

$A0E5 

RMRscRelease 

I 339 

$A0E6 

RMRscDetach 

I 339 

$A0E7 

RMMaxIDGet 

I 339 

$A0E8 

RMResSave 

1339 

$A0E9 

RMHdIToRsc 

I 339 

$A0EA 

RMCurResGet 

I 340 

$A0EB 

RMLastResGet 

I 340 

$A0EC 

RMResLoad 

I 340 

$A0ED© 

RMResLinkGet 

11275 

$A0EE© 

RMResTypeList 

11275 

$A0EF© 

RMResIDList 

11276 

$AI2D 

GMOpenGraph 

I 340 

$AI2E 

GMCIoseGraph 

I 340 

$AI30 

GMInitGraph 

I 341 

$AI3I 

GMSetGraph 

I 341 

$AI32 

GMGetGraph 

I 341 

$AI33 

GMCopyGraph 

I 341 
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$AI35 

• 

I 341 

$AI69 

GMRectlnRgn 

I 351 

$AI36 

GMMoveGraph 

I 341 

$AI6A 

GMEquaIRgn 

I 351 

$AI37 

GMSIideGraph 

1342 

$AI6B 

GMEmptyRgn 

I 351 

$AI38 

GMSetClip 

I 342 

$AI6C© 

GMlmgToRgn 

11305 

$AI39 

GMGetClip 

I 342 

$AI6D 

GMInitBitmap 

I 352 

$AI3A 

GMClipRect 

I 342 

$AI6E 

GMMove 

I 352 

$AI3B 

GMSetHome 

I 342 

$AI6F 

GMMoveRel 

I 352 

$AI3C 

GMSetGraphSize 

I 342 

$AI70 

GMLine 

I 352 

$AI3D 

GMSetBitmap 

I 343 

$AI7I 

GMLineRel 

I 352 

$AI3E 

GMLocalToGlobal 

I 343 

$AI72 

GMFrameRect 

I 352 

$AI3F 

GMGIobalToLocal 

I 343 

$AI73 

GMFillRect 

I 353 

$AI40 

GMInitPen 

I 343 

$AI74 

GMFrameOval 

I 353 

$AI4I 

GMPenShow 

I 343 

$AI75 

GMFillOval 

1353 

$AI42 

GMPenHide 

I 343 

$AI76 

GMFrameRRect 

I 353 

$AI43 

GMPenSize 

I 343 

$AI77 

GMFilIRRect 

I 353 

$AI44 

GMPenMode 

I 344 

$AI78© 

GMFrameArc 

11305 

$AI45 

GMPenPat 

I 344 

$AI79® 

GMFillArc 

11305 

$AI46 

GMExPat 

I 344 

$AI7A 

GMFrameRgn 

I 353 

$AI47 

GMForeColor 

I 344 

$AI7B 

GMFilIRgn 

I 354 

$AI48 

GMBackColor 

I 344 

$AI7C© 

GMFramePoly 

11306 

$AI49 

GMAPage 

I 345 

$AI7D© 

GMFillPoly 

11306 

$AI4A 

GMGetLoc 

I 345 

$AI7E 

GMScroll 

I 354 

$AI4B 

GMGetPen 

I 345 

$AI7F 

GMCopy 

I 354 

$AI4C 

GMSetPen 

I 345 

$AI80 

GMCopyMask 

I 354 

$AI4D 

GMInitialize 

I 345 

$AI8I 

• 

I 355 

$AI4E 

GMNullRect 

I 345 

$AI82 

GMPIotlmg 

I 355 

$AI4F 

GMSizeRect 

I 345 

$AI83 

GMPutRlmg 

I 355 

$AI50 

GMAndRects 

I 346 

$AI86 

GMDupHImg 

I 356 

$AI5I 

GMMoveRect 

I 346 

$AI87 

GMDupVImg 

I 356 

$AI52 

GMSIideRect 

I 346 

$AI88 

GMDupHRImg 

I 356 

$AI53 

GMInsetRect 

I 346 

$AI89 

GMDupVRImg 

I 356 

$AI54 

GMAndRect 

I 347 

$AI8B 

GMFontKind 

I 357 

$AI55 

GMOrRect 

I 347 

$AI8C 

GMFontFace 

I 357 

$AI56 

GMPtlnRect 

I 347 

$AI8D 

GMFontMode 

I 357 

$AI57 

GMEqualRect 

I 347 

$AI8E 

GMFontSize 

I 357 

$AI58 

GMEmptyRect 

1348 

$AI8F 

GMDrawChar 

I 357 

$AI59 

GMAdjustRect 

1348 

$AI90 

GMDrawStrL 

1358 

$AI5A 

GMNewRgn 

I 348 

$AI9I 

GMDrawStr 

I 358 

$AI5B 

GMDisposeRgn 

I 348 

$AI92 

GMDrawStrZ 

I 358 

$AI5C 

GMOpenRgn 

I 348 

$AI94 

GMCharWidth 

1358 

$AI5D 

GMCIoseRgn 

1348 

$AI95 

GMStrLWidth 

I 358 

$AI5E 

GMNulIRgn 

I 349 

$AI96 

GMStrWidth 

I 359 

$AI5F 

GMRectRgn 

I 349 

$AI97 

GMStrLength 

I 359 

$AI60 

GMCopyRgn 

I 349 

$AI98 

GMFontlnfo 

I 359 

$AI6I 

GMMoveRgn 

I 349 

$AI99 

GMOpenScript 

I 359 

$AI62 

GMSIideRgn 

I 349 

$AI9A 

GMCIoseScript 

I 359 

$AI63 

GMInsetRgn 

I 349 

$AI9B 

GMDisposeScript 

I 360 

$AI64 

GMAndRgn 

I 350 

$AI9C 

GMDrawScript 

I 360 

$AI65 

GMOrRgn 

I 350 

$AI9D 

GMGetScript 

I 360 

$AI66 

GMDiffRgn 

I 350 

$AI9E© 

GMOpenPoly 

11306 

$AI67 

GMXorRgn 

I 350 

$AI9F© 

GMCIosePoly 

11306 

$AI68 

GMPtlnRgn 

I 351 

$AIA0© 

GMDisposePoly 

11306 
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$AIAI 

GMShadowStrZ 

1360 

$AID8© 

GMAndRectRgn 

11312 

$AIA2 

GMShadowRect 

1361 

$AID9© 

GMOrRectRgn 

11313 

$AIA3 

GMInvertRect 

1361 

$AIDA© 

GMDiffRectRgn 

11313 

$AIA5 

GMInvertBits 

I 361 

$AIDB© 

GMXorRectRgn 

11313 

$AIA6 

GMMapPt 

I 361 

$AIDC© 

GMCharKind 

11313 

$AIA7 

GMMapRect 

I 361 

$AIDD© 

GMDiffRgnRect 

11314 

$AIA8© 

GMMapPoly 

11306 

$AIE0© 

GMAddFont 

11314 

$AIA9 

GMMapRgn 

1362 

$AIEI© 

GMRemoveFont 

11314 

$AIAA 

GMScalePt 

1362 

$AIE2© 

GMGetFontLink 

11314 

$AIAB 

GMInitPalet 

I 362 

$AIE3© 

GMGetHProcTbl 

11314 

$AIAC 

• 

I 363 

$AIE6© 

GMGetStdProcTbl 

11314 

$AIAD 

GMDrawG 16 

I 363 

$AIE7© 

GMGetFontProcTbl 

11314 

$AIAE 

• 

1363 

$AIE8© 

GMGetRgnProcTbl 

11314 

$AIAF 

GMGetPixel 

1363 

$AIF8 

WMInit 

1366 

$AIBI 

GMCalcMask 

I 363 

$AIF9 

WMOpen 

1366 

$AIB2 

GMCalcFrame 

1364 

$AIFA 

WMRefer 

I 366 

$AIB3 

SXLongMul 

I 364 

$AIFB 

WMCIose 

1367 

$AIB4 

SXFixRound 

I 364 

$AIFC 

WM Dispose 

1367 

$AIB6 

SXFixMul 

I 364 

$AIFD 

WMFind 

1367 

$AIB7 

SXFixDiv 

I 365 

$AIFE 

WMSelect 

I 367 

$AIB8 

GMGetFontTable 

1365 

$AIFF© 

WMSelect2 

( 1 367),11276 

$AIB9© 

GMCopyStdProc 

11307 

$A200 

WMCarry 

I 368 

$AIBA 

GMStrZWidth 

I 365 

$A20I 

WMShine 

1368 

$AIBB@ 

GMTransImg 

11307 

$A202 

WMMove 

1368 

$AIBC© 

GMFillRImg 

11307 

$A203 

WMSize 

1368 

$AIBD© 

GMFilllmg 

11307 

$A204 

WMGrow 

1369 

$AIBE© 

GMSIidedRgn 

11308 

$A205 

WMDrag 

I 369 

$AIBF© 

GMPaintRgn 

11308 

$A206 

WMZoom 

I 369 

$AIC0@ 

GMSetRgnLine 

11308 

$A207 

WMShow 

I 369 

$AICI© 

GMGetRgnLine 

11308 

$A208 

WMHide 

1370 

$AIC2© 

GMInitGraphMode 

11308 

$A209 

WMShowHide 

I 370 

$AIC3© 

GMCurFont 

11309 

$A20A 

WMCheckBox 

I 370 

$AIC4® 

GMGetScrnSize 

11309 

$A20B 

WMCheckCBox 

I 370 

$AIC5© 

GMExgGraph 

11309 

$A20C 

WMDrawGBox 

I 370 

$AIC6© 

GMExgBitmap 

11309 

$A20D 

WMUpdate 

1371 

$AIC7© 

GMGetBitmap 

11309 

$A20E 

WMUpdtOver 

I 371 

$AIC8© 

GMCalcBitmap 

11309 

$A20F 

WMActive 

I 371 

$AIC9© 

GMCalcScrnSize 

11309 

$A2I0 

WMGraphGet 

1371 

$AICA© 

GMNewBits 

11310 

$A2I 1 

• 

1371 

$AICB© 

GMDisposeBits 

11310 

$A2I2 

• 

I 371 

$AICC© 

GMLockBits 

11310 

$A2I3 

• 

1371 

$AICD©- 

GMUnlockBits 

11310 

$A2I4 

• 

I 372 

$AICE© 

GMItalicRect 

11310 

$A2I5 

• 

I 372 

$AICF© 

GMItalicRgn 

11310 

$A2I6 

• 

I 372 

$AID0© 

GMFreeBits 

1131 1 

$A2I7 

• 

I 372 

$AIDI© 

GMCalcGraph 

11311 

$A2I8 

WMAddRect 

I 372 

$AID2© 

GMPacklmage 

1131 1 

$A2I9 

WMAddRgn 

I 373 

$AID3© 

GMUnpacklmage 

11311 

$A2IA 

WMSubRect 

I 373 

$AID4© 

GMAdjustPt 

1131 1 

$A2IB 

WMSubRgn 

I 373 

$AID5© 

GMPutlmg 

11312 

$A2IC 

WMGScriptSet 

I 373 

$AID6© 

GMCenterRect 

11312 

$A2ID 

WMGScriptGet 

I 373 

$AID7© 

GMScrewRect 

11312 

$A2IE 

WMTitleSet 

I 373 
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$A2IF 

WMTitleGet 

I 373 

$A2C3 

DMOpen 

1381 

$A220 

WMTIDSet 

I 374 

$A2C4 

DMRefer 

I 382 

$A22I 

WMTIDGet 

I 374 

$A2C5 

DMCIose 

1382 

$A222 

WMPinRect 

I 374 

$A2C6 

DMDispose 

I 382 

$A223 

WMCalcUpdt 

I 374 

$A2C7 

DMControl 

I 382 

$A224 

WMGetDTGS 

I 374 

$A2C8 

DMDraw 

1382 

$A225 

WMDragRgn 

I 374 

$A2C9 

Alart 

1383 

$A227© 

WSOpen 

11279 

$A2CA 

StopAlart 

I 383 

$A228© 

WSCIose 

11279 

$A2CB 

NoteAlart 

1383 

$A229© 

WSDispose 

11279 

$A2CC 

CautionAlart 

I 383 

$A22A© 

WSEnlist 

11279 

$A2CD 

CouldAlart 

1383 

$A22B© 

WSDelist 

11279 

$A2CE 

FreeAlart 

I 384 

$A22C© 

WMOptionGet 

11276 

$A2CF 

DIGet 

1384 

$A22D© 

WMOptionSet 

11276 

$A2D0 

DISet 

I 384 

$A266 

MNInit 

I 375 

$A2DI 

DITGet 

1384 

$A267 

MNRefer 

I 375 

$A2D2 

DITSet 

I 385 

$A268 

MNSelect 

I 375 

$A2D3 

DITSelect 

I 385 

$A269© 

MNConvert 

11278 

$A2D4 

GetAIrtStage 

I 385 

$A289 

CMOpen 

1376 

$A2D5 

ResetAIrtStage 

I 385 

$A28A 

CMDispose 

I 376 

$A2D6 

DIUpdate 

I 385 

$A28B 

CMKill 

I 376 

$A2D7 

DMBeep 

1385 

$A28C 

CMHide 

I 376 

$A2D8 

DIHide 

I 385 

$A28D 

CMShow 

I 377 

$A2D9 

DIShow 

I 386 

$A28E 

CMDraw 

1377 

$A2F6 

DMError 

1386 

$A28F 

CMDrawOne 

I 377 

$A2F7 

DMWaitOpen 

I 386 

$A290 

CMValueSet 

I 377 

$A2F8 

DMWaitClose 

I 386 

$A29I 

CMValueGet 

I 377 

$A2F9 

DMWaitWhile 

I 386 

$A292 

CMMinSet 

I 377 

$A30A 

TMInit 

I 387 

$A293 

CMMinGet 

I 378 

$A30B 

TMNew 

1387 

$A294 

CMMaxSet 

I 378 

$A30C 

TMSetRect 

1387 

$A295 

CMMaxGet 

I 378 

$A30D 

TMChangText 

I 388 

$A296 

CMMove 

I 378 

$A30E 

TMIdle 

I 388 

$A297 

CMSize 

1378 

$A30F 

TMActive 

I 388 

$A298 

CMShine 

I 378 

$A3I0 

TMDeactive 

I 388 

$A299 

CMFind 

I 379 

$A31 1 

TM Caret 

I 388 

$A29A 

CMCheck 

I 379 

$A3I2 

TMDispose 

I 388 

$A29B 

CM Refer 

I 379 

$A3I3 

TMUpDate 

I 389 

$A29C 

CMTitieGet 

I 380 

$A3I4 

TMSetText 

I 389 

$A29D 

CMDragControl 

I 380 

$A3I5 

TMGetText 

1389 

$A29E 

CMDraws 

I 380 

$A3I6 

TMSetSelect 

I 389 

$A29F 

CMTitleSet 

I 380 

$A3I7© 

TMKey 

(I 390),11285 

$A2A0© 

CMOptionGet 

11277 

$A3I8© 

TMStr 

(I 390) ,11285 

$A2AI© 

CMOptionSet 

11277 

$A3 1 9© 

TMCalText 

(I 390),11285 

$A2A2© 

CMUserGet 

11277 

$A3IA 

TMPinScroll 

I 390 

$A2A3© 

CMUserSet 

11277 

$A3IB 

TMCIick 

I 390 

$A2A4© 

CMProcGet 

11277 

$A3IC© 

TMEvent 

(I 391)， 11285 

$A2A5© 

CMProcSet 

11277 

$A3ID 

• 

I 391 

$A2A6© 

CMDefDataGet 

11278 

$A3IE 

• 

I 392 

$A2A7© 

CMDefDataSet 

11278 

$A3IF 

• 

I 392 

$A2C0 

DMInit 

I 380 

$A320© 

TMCut 

(I 392) ,11286 

$A2CI 

ErrorSound 

I 381 

$A32I 

TMCopy 

I 392 

$A2C2 

DMFontSet 

I 381 

$A322© 

TMPaste 

(I 392) ,11286 
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$A323@ 

TMDelete 

(I 393) ,11286 

$A35B 

TSGetTdb 

I 400 

$A324© 

TM Insert 

(I 393)， 11286 

$A35C 

TSSetTdb 

I 400 

$A325 

TMFromScrap 

I 393 

$A35E 

TSGetWindowPos 

I 400 

$A326 

TMToScrap 

I 393 

$A35F 

TSCommunicate 

I 400 

$A327 

TMScrapHandle 

I 393 

$A360 

TSGetID 

I 401 

$A328 

TMGetScrapLen 

I 393 

$A36I 

TSMakeEvent 

I 401 

$A329 

• 

1393 

$A362 

• 

I 401 

$A32A 

TMTextBox 

I 394 

$A363 

• 

I 401 

$A32B 

TMTextBox2 

I 394 

$A364 

TSGetStartMode 

I 402 

$A32C© 

TMCacheON 

11287 

$A365 

TSSetStartMode 

1402 

$A32D© 

TMCacheOFF 

11287 

$A366 

TMOpen 

1394 

$A32E© 

TMCacheFlush 

11287 

$A367 

TSOpen 

I 402 

$A32F© 

TMShow 

11287 

$A368 

TSCIose 

1402 

$A330© 

TMHide 

11287 

$A369 

TSRmDirH 

1402 

$A33I© 

TMSelShow 

11287 

$A36A 

TSCopyH 

I 402 

$A332© 

TMSelHide 

11288 

$A36B 

TSMkDirH 

1403 

$A333© 

TMSearchStrF 

11288 

$A36C 

TSMoveH 

I 403 

$A334© 

TMSearchStrB 

11288 

$A36D 

TSCreate 

1403 

$A335© 

TMTextlnWidth2 

11288 

$A36E 

TSDeleteH 

I 403 

$A336© 

TMTextWidth2 

11289 

$A36F 

TSTrash 

I 404 

$A337© 

TMDrawText2 

11289 

$A370 

TSFiles 

I 404 

$A338© 

TMUpDate2 

11290 

$A37I 

TSNFiles 

I 404 

$A339© 

TMUpDate3 

11290 

$A372 

TSCopyP 

I 404 

$A33A© 

TMCalCOLine 

11290 

$A373 

TSDeleteP 

I 405 

SA33C© 

TMCalLine 

11290 

$A374 

TSRmDirP 

I 405 

$A33D© 

TMLeftSel 

11291 

$A375 

TSMkDirP 

I 405 

$A33E© 

TMRightSel 

11291 

$A376 

TSMoveP 

I 405 

$A33F© 

TMPointSel 

11291 

$A377 

• 

I 406 

$A340© 

TMOffsetSel 

11291 

$A378 

TSChMod 

I 406 

$A34I@ 

TMPointToLine 

11292 

$A379 

TSWhatFile 

1406 

$A343© 

TMCalSelPoint 

11292 

$A37A 

• 

I 406 

$A345© 

TMSetView 

11292 

$A37B 

TSDeleteVoname 

I 407 

$A346© 

TMScroll 

11292 

$A37C 

TSCreateVoname 

I 407 

$A347© 

TMPointScroll 

11292 

$A380 

• 

I 407 

$A348© 

TMStr2 

11293 

$A38I 

TSSearchFileND 

I 407 

$A349© 

TMKeyToAsk 

11293 

$A382 

• 

I 408 

$A34A© 

TMNextCode 

11293 

$A383 

• 

1408 

$A34B® 

TMSetTextH 

11294 

$A384 

• 

I 408 

$A34C 

TSInitTsk 

I 396 

$A385 

• 

I 408 

$A34D 

TSTiniTsk2 

1396 

$A386 

TSGetOpen 

I 408 

$A34E 

TSInitCrtM 

I 396 

$A387 

TSZeroDrag 

I 408 

$A34F 

TSTiniCrtM 

I 396 

$A388 

TSPutDrag 

I 408 

$A350 

• 

I 396 

$A389 

TSGetDrag 

I 409 

$A35I 

TSFock 

I 397 

$A38A 

TSBeginDrag 

1409 

$A352 

TSExit 

I 398 

$A38B 

• 

I 409 

$A353 

TSFockB 

I 398 

$A38C 

TSEndDrag 

I 409 

$A355 

TSFockSItem 

I 398 

$A38D 

TSHideDrag 

I 409 

$A356 

TSFocklcon 

I 398 

$A38E 

TSShowDrag 

I 409 

$A357 

TSEventAvail 

I 399 

$A38F 

TSZeroScrap 

I 409 

$A358 

TSGetEvent 

I 399 

$A390 

TSPutScrap 

I 410 

$A359 

• 

I 399 

$A39I 

TSGetScrap 

I 410 

$A35A 

TSPostEventTsk 

I 399 

$A392 

• 

I 410 
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$A393 

• 

I 410 

$A3D0 

SXFnamecmp 

I 422 

$A394 

• 

I 410 

$A3DI 

• 

I 422 

$A395 

• 

I 410 

$A3D2 

• 

I 422 

$A396 

• 

I 41 1 

$A3D3 

• 

I 422 

$A397 

TSSearchTrashpath 

I 41 1 

$A3D4 

SXSearchFname 

I 423 

$A398 

TSSearchTrashfile 

I 41 1 

$A3D5 

• 

I 423 

$A399 

TSEmptyTrash 

I 41 1 

$A3D6 

• 

I 423 

$A39A 

• 

I 41 1 

$A3D7 

• 

I 423 

$A39B 

TSSearchdpb 

I 41 1 

$A3D8 

SXStoLower 

I 423 

$A39C 

• 

I 412 

$A3D9 

SXStoUpper 

I 424 

$A39D 

TSDrvctrl 

I 412 

$A3DA 

SXStoUpper2 

I 424 

$A39E 

TSDrvctrl2 

I 412 

$A3DB 

• 

I 424 

$A39F 

• 

I 412 

$A3DC 

• 

I 424 

$A3A0 

• 

I 413 

$A3DD 

• 

I 424 

$A3AI 

• 

I 413 

$A3DE 

• 

I 424 

$A3A2 

SXCallWindM 

I 413 

$A3DF 

• 

1425 

$A3A3 

SXCallCtrIM 

I 413 

$A3E0 

• 

1425 

$A3A4 

• 

I 414 

$A3EI 

• 

I 425 

$A3A7 

• 

1414 

$A3E2 

• 

I 425 

$A3A8 

• 

I 414 

$A3E3 

• 

I 425 

$A3A9 

• 

I 414 

$A3E4 

• 

I 426 

$A3AA 

SXInvalScBar 

I 415 

$A3E5 

• 

1426 

$A3AB 

SXValidScBar 

I 4i5 

$A3E6 

• 

I 426 

$A3AC 

• 

I 415 

$A3E7 

• 

I 426 

$A3AD 

• 

1415 

$A3E8 

• 

1426 

$A3AE 

• 

I 415 

$A3E9 

SXVer 

I 427 

$A3AF 

• 

I 415 

$A3EA 

TSTakeParam 

I 427 

$A3B0 

• 

I 416 

$A3EB 

• 

I 427 

$A3BI 

• 

I 416 

$A3EC 

• 

I 427 

$A3B2 

• 

1417 

$A3ED 

• 

I 428 

$A3B4 

• 

1417 

$A3EF 

• 

1428 

$A3B5 

• 

I 417 

$A3F0 

• 

1428 

$A3B7 

• 

1417 

$A3FI 

• 

1428 

$A3B9 

• 

1418 

$A3F2 

• 

I 429 

$A3BB 

TSISRecToStr 

1418 

$A3F3 

• 

1429 

$A3BC 

• 

I 418 

$A3F4 

TSFindTskn 

1429 

$A3BD 

• 

I 418 

$A3F5 

• 

1429 

$A3BF 

TSCreateISFile 

1418 

$A3F6 

• 

I 429 

$A3C0 

• 

I 419 

$A3F7 

TSDriveCheckAII 

I 429 

$A3CI 

• 

I 419 

$A3F8 

TSDriveCheck 

I 430 

$A3C2 

• 

I 419 

$A3F9 

TSISRecToExec 

I 430 

$A3C3 

• 

I 419 

$A3FA 

TSGetDtopMode 

1430 

$A3C4 

• 

I 420 

$A3FB 

TSSetDtopMode 

I 430 

$A3C7 

• 

I 420 

$A3FC 

TSSearchOpen 

I 430 

$A3C8 

• 

I 420 

$A3FE 

TSFindOwn 

I 430 

$A3C9 

• 

I 420 

$A3FF 

TSCommunicateS 

I 431 

$A3CA 

• 

I 420 

$A40I 

TMNew2 

I 395 

$A3CB 

• 

I 421 

$A402 

TSSearchFile2 

I 431 

$A3CC 

SXFileConnPath 

I 421 

$A403 

TSSearchFile 

I 432 

$A3CD 

SXFilelnPath 

I 421 

$A404 

• 

I 432 

$A3CE 

• 

I 421 

$A405 

• 

I 432 

$A3CF 

• 

I 421 

$A406 

SXStrCmp 

I 432 
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$A407 

• 

I 433 

$A437© 

SXSRAMCheck 

11304 

$A408 

TSCreatelSBadge 

I 433 

ライブラリ 

TSSetAbort 

11305 

$A409 

• 

1433 

$A460© 

TMNextCodeln 

11294 

$A40A 

TSGetCMDS 

I 433 

$A462© 

TMSelReverse 

11294 

$A40B 

TSFockCM 

I 434 

$A463© 

TMTini 

11294 

$A40C 

• 

1434 

$A464® 

TMSetSelCal 

11294 

$A40D 

TSTiniTsk 

I 434 

$A465© 

TMActivate2 

11295 

$A40E 

• 

I 434 

$A466© 

TMDeactivate2 

11295 

$A40F 

• 

I 434 

$A467© 

TMCheckSel 

11295 

$A4I0 

• 

I 435 

$A468© 

TMCalPoint2 

11295 

$A4I 1 

• 

1435 

$A46A© 

TMISZen 

11296 

$A4I2 

SXStrCopy 

I 435 

$A46B@ 

TMSetDestOffset 

11296 

$A4I3 

• 

I 435 

$A46C© 

TMGetDestOffset 

11296 

$A4I4© 

• 

11297 

$A46D© 

TMGetSelect 

11296 

$A4I5© 

TSPostEventTsk2 

11298 

ライブラリ 

TMEventW 

11297 

$A4I6© 

• 

11298 

ライブラリ 

TMUpDateExist 

11297 

$A4I7© 

TSAnswer 

11298 

$A4E0© 

PMInit 

11280 

$A4I8© 

TSSendMes 

11298 

$A4EI© 

PMTini 

11280 

$A4I9© 

TSGetMes 

11299 

$A4E2© 

PMOpen 

11280 

$A4IA@ 

TSInitTsk2 

11299 

$A4E3© 

PMCIose 

11280 

$A4IF© 

SXCallWindM2 

11299 

$A4E4© 

PMSetDefault 

11280 

$A420® 

TSBeginDrag2 

11300 

$A4E5@ 

PMValidate 

11280 

$A42I© 

• 

11300 

$A4E6© 

PMImageDialog 

11281 

$A422© 

SXGetVector 

11300 

$A4E7© 

PMStrDialog 

11281 

$A423© 

SXSetVector 

11301 

$A4E9© 

PMEnvCopy 

11281 

$A424© 

• 

11301 

$A4EA© 

PMJobCopy 

11281 

$A425© 

• 

11301 

$A4EB© 

PMOpenlmage 

11281 

$A426© 

• 

11301 

$A4EC@ 

PMRecordPage 

11282 

$A427© 

TSCellToStr 

11301 

$A4ED© 

PMPrintPage 

11282 

$A428© 

• 

11302 

$A4EE© 

PMCancelPage 

11282 

$A429© 

• 

11302 

$A4EF© 

PMAction 

11282 

$A42A© 

SXLockFSX 

11302 

$A4F0© 

PMCIoselmage 

11282 

$A42B© 

SXUnlockFSX 

11302 

$A4FI© 

PMDrawString 

11282 

$A42C© 

TSFockMode 

11303 

$A4F2© 

PMVer 

11283 

$A42D© 

• 

11303 

$A4F3© 

PMDrvrVer 

11283 

$A42E© 

• 

11303 

$A4F4© 

PMDrvrCtrl 

11283 

$A42F® 

• 

11303 

$A4F5© 

PMDrvrID 

11283 

$A430© 

TSSetGraphMode 

11303 

$A4F6© 

PMDrvrHdl 

11283 

$A43I© 

TSGetGraphMode 

11304 

$A4F7© 

PMMaxRect 

11283 

$A432® 

SXGetDispRect 

11304 

$A4F8© 

PMSaveEnv 

11284 

$A433© 

• 

11304 

$A4F9© 

PMReady 

11284 

$A434© 

• 

11304 

$A4FA© 

PMProcPrint 

11284 

$A435© 

SXSRAMVer 

11304 

$A4FB© 

PMDrvrlnfo 

11284 

$A436© 

SXSRAM Reset 

11304 
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CMCheck 


$A29A 

1379 

DMWaitOpen 


$A2F7 

I 386 

CMDefDataGet 

◎ 

$A2A6 

11278 

DMWaitWhile 


$A2F9 

I 386 

CMDefDataSet 

◎ 

$A2A7 

11278 

EMBIinkGet 


$A0BI 

I 336 

CMDispose 


$A28A 

I 376 

EMBIinkSet 


$A0B6 

1337 

CMDragControl 


$A29D 

I 380 

EMClean 


$A0B2 

I 336 

CMDraw 


$A28E 

I 377 

EMDCIickGet 


$A0B0 

I 336 

CMDrawOne 


$A28F 

I 377 

EMDCIickSet 


$A0B5 

I 337 

CMDraws 


$A29E 

I 380 

EM DeCross 


$A0B8 

I 337 

CMFind 


$A299 

I 379 

EMDTTskSet 


$A0B4 

I 336 

CMHide 


$A28C 

I 376 

EMEnCross 


$A0B7 

I 337 

CMKill 


$A28B 

I 376 

EMGet 


$A0A5 

1335 

CMMaxGet 


$A295 

1378 

EMInit 


$A0A2 

I 334 

CMMaxSet 


$A294 

I 378 

EMKMapGet 


$A0AE 

I 336 

CMMinGet 


$A293 

1378 

EMLBttn 


$A0A8 

1335 

CMMinSet 


$A292 

I 377 

EMLStill 


$A0AA 

I 335 

CMMove 


$A296 

I 378 

EMLWait 


$A0AC 

I 335 

CMOpen 


$A289 

I 376 

EMMaskSet 


$A0B3 

I 336 

CMOptionGet 

◎ 

$A2A0 

11277 

EMMSLoc 


$A0A7 

I 335 

CMOptionSet 

◎ 

$A2AI 

11277 

EMRBttn 


$A0A9 

1335 

CMProcGet 

◎ 

$A2A4 

11277 

EMRStill 


$A0AB 

I 335 

CMProcSet 

◎ 

$A2A5 

11277 

EMRWait 


$A0AD 

1336 

CMRefer 


$A29B 

I 379 

EMScan 


$A0A6 

1335 

CMShine 


$A298 

I 378 

EMSet 


$A0A4 

I 334 

CMShow 


$A28D 

1377 

EMSysTime 


$A0AF 

1336 

CMSize 


$A297 

I 378 

EMTini 


$A0A3 

I 334 

CMTitleGet 


$A29C 

1380 

EXAnimEnd 


$A074 

I 330 

CMTitleSet 


$A29F 

I 380 

EXAnimStart 


$A073 

1330 

CMUserGet 

◎ 

$A2A2 

11277 

EXAnimTest 


$A075 

1330 

CMUserSet 

◎ 

$A2A3 

11277 

EXDeVDISPST 


$A069 

1328 

CMValueGet 


$A29I 

I 377 

EXEnVDISPST 


$A068 

1328 

CMValueSet 


$A290 

I 377 

GMAddFont 

◎ 

$AIE0 

11314 

DIGet 


$A2CF 

I 384 

GMAdjustPt 

◎ 

$AID4 

11311 

DIHide 


$A2D8 

1385 

GMAdjustRect 


$AI59 

1348 

DISet 


$A2D0 

I 384 

GMAndRect 


$AI54 

I 347 

DIShow 


$A2D9 

I 386 

GMAndRectRgn 

◎ 

$AID8 

11312 

DITGet 


$A2DI 

I 384 

GMAndRects 


$AI50 

1346 

DITSelect 


$A2D3 

I 385 

GMAndRgn 


$AI64 

I 350 

DITSet 


$A2D2 

1385 

GMAPage 


$AI49 

1345 

DIUpdate 


$A2D6 

1385 

GMBackColor 


$AI48 

1344 

DMBeep 


$A2D7 

I 385 

GMCalcBitmap 

◎ 

$AIC8 

11309 

DMCIose 


$A2C5 

I 382 

GMCalcFrame 


$AIB2 

I 364 

DMControl 


$A2C7 

I 382 

GMCalcGraph 

◎ 

$AIDI 

11311 

DMDispose 


$A2C6 

I 382 

GMCalcMask 


$AIBI 

I 363 

DMDraw 


$A2C8 

I 382 

GMCalcScrnSize 

◎ 

$AIC9 

11309 

DMError 


$A2F6 

I 386 

GMCenterRect 

◎ 

$AID6 

11312 

DMFontSet 


$A2C2 

I 381 

GMCharKind 

◎ 

$AIDC 

11313 

DMInit 


$A2C0 

I 380 

GMCharWidth 
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あとがき 


前著 『SX-WINDOW プログラミング』 刊行から 半年 以上 経った いま， 決して 心底 満足す 
る ほどでは. ない にしろ， SX-WINDOW を とりま く 状況が'? 萑 実に 変化して きた こ とを 感じて 
います。 おそらくは， よい 方向に。 

来春には シャープよ り 糸 tIE SX-WINDOW 開発 キッ トが リ リース される 予定です し， サー 
ド パー ティから も SX 対応 ソフトの 発売 力吁定 されて いる 模様です。 市販 ソフトの 露払い 役 
を 務めた Easypaint も 素敵な ソフ トでした。 

パワー ユーザの 存在な く しては 語れない X68000 の 世界では， 彼らが 力を 貸して くれる か 
否かで 物事の 動き はずい ぶん 違って きます。 パソコン通信 等で SX-WINDOW の フリー ソフ 
トウ ェアを 公開して くれる パワー ユーザ （誰が 呼んだ か 「SXer」） の 皆さんの 存在は 心強い 
ばかりです。 その ハ。 ワ ーの 一部は， 付録 ディスクに 収録 させて いただいた フリーソフトウェア 
から 感じ取って いただける と 思います。 

SX1.10 が， こうした 動きを 支える だけの 地力を 備えて いる ことは， 本書で いくらか はお 
伝えで きたので はない かと 思います。 また， SX1.0£ から SX1.10 への バージョンアップが 
そうであった ように， 新たな ニーズに 対応す るた めに， 遠からず， さらなる 機能 強化が 行われ 
る こと も 考えられます。 

新しい プラット フ オームと しての SX-WINDOW は， いよいよ 本格的な 離陸の 時期を 迎え 
たようです。 より 高度な アプリケーションが 作成で きる ことは もちろん， より 容易に， 誰に で 
も アプリケーションが 作成で きる 環境 力 整う こと も 期待したい ところです。 

本書では SX-WINDOW の 「現在」 を お伝えし ま した。 

本書を もって SX-WINDQW の 「未来」 を 創る 皆さんの お手伝いが できる のなら ば， 私に 
とって 無上の 喜びです。 

最後に， 前著 および 本書の 執筆に あたり， ご協力いた だいた すべての 方に 心から 感謝いた し 
ます。 


1991 年 11 月 


吉舰敏 
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は、 この 新しい SX-WINDOW ver. 1 .丨〇 に 対応すべく 書き下ろされた ものである。 記述の ポイントは、 大幅に 増設され た SX コー 
ル、 新設され た 2 つの マネージャの 解説の ほか、 C 言語での プログラミングに ついても 触れて いる 0 また、 付録 ディスクには、 前 
著と 本書で 取り上げた サンプル プログラムの ほか、 ver. 1 • 10 対応の C の ライブラリ （サンプル 版）、 PDS として 流布され ている 
SX-WINDOW 上の アプリケーション も 収録して いる。 
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